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| Version: *v04-000' 


PAPE SESILISL IIIS EET T TTT TT TTT Trcic circ iirc ri ici titi iii tii iiitiiiiiiay 
' 


ie COPYRIGHT (c) 1978, 1980, 1982, 1984 BY 
ie DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASSACHUSETTS. 
ie ALL RIGHTS RESERVED. 


:* THIS SOFTWARE IS FURNISHED UNDER A LICENSE AND MAY BE USEP AND COPIED 
:* ONLY IN ACCORDANCE WITH THE TERMS OF SUCH LICENSE AND WITH THE 
:* INCLUSION OF THE ABOVE COPYRIGHT NOTICE. THIS SOFTWARE OR ANY OTHER 
:* COPIES THEREOF MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY 
:* OTHER PERSON. NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY 


« 
® 
® 
® 
® 
* 
*® 
® 
® 
ie TRANSFERRED. * 
® 
® 
® 
® 
® 
® 
® 
® 
® 
® 
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is THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE 
- OORPORATI On NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT 


ie DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS 
t® SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL. 
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i NMAHEAD.B32 

Define SEQULST macro to make Library from the NMALIBRY.B32 file 
This source is taken from the following source: 


WN "OC CONOUFSWN OO OONOULS WHO 


AAA 


Ssssssss 
Sak 


a 
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Y DEFINITION MACROS FOR BLISS PROCESSING 
ON MACROS. 


: MACRO TO GENERATE EQULST CONSTRUCTS. 


NOourunm—owe 


MACRO 

i SEQULST(P,G,1,S) TAJ= 
M 0048 ZNAME(P;GETIST_ A) = 
™ 0049 ZIF°NUL2ND- A 
+, 0050 XTHEN (1) 4 ZCOUNT#(S) ! ASSUMES I, S ALWAYS GENERATED BY CONVERSION PROGRAM 
M0051 ZELSE GET2ND_ A 

38 FI %, 
m 0054 GET1ST_(A,B)= 

55 A 
m 0056 GET2ND_(A,B)= 

5 Bx, ! KNOWN NON-NULL 


Sete Ge Ge Geese 
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NUL2ND_ (A,B) 
PAULL CB) %; 


End of NMAHEAD 
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! Created 15-SEP-1984 23:06:10 by VAX=11 SDL v2.0 Source: 15-SEP-1984 22:47:42 _$255$DUA28: CNETACP.SRCINETC 


! PETTITTE TIAL LILILII LATE T LILLIA LILLIE TLE LITTLE Ti LTE) 


Define string parse table i.d.'s 


twee MODULE CNR te* 
literal CNRSC_SEM_BIT = 0; ' Type = bit 
Literal CNRSC_SEM_B = 1; ! Type = byte 
Literal ENRSCHSEMCL = 3: i Tope = Longuord 
Literal CNRSCISEM_STR ="4; i Type = string descriptor 
; Define field access control 
literal CNRSC_ACC_RW = 0; ! General read/write 
HASeaE EMMRESAEES. } feed eat 
era = 1; ! Read on 
Literal CNRSC-ACC_WO = 2; ! Write onty (for passwords, etc) 
Literal CNRSC_ACC_W = 2; ! Write only (for passwords, etc) 
Literal CNRSC_ACC_CW = 5; ! Conditionally writable 
Literal CNRSC_ACC_C = 3; ! Conditionally writable 
Literal CNRSC_ACC_ER = 4; i External read only (e.g., if from Q10) 
Literal CNRSC_ACC_E = 4; ! External read only (e.g., if from Q10) 
Literal CNRSC_ACC_NE = 5; ! No external read or write access 
Literal CNRSC_ACC_N = 5; ! No external read or write access 
i 
i 


literal CNRSC_SEM_T 


_T = 0; ! Transparent - all characters are legal 
Literal CNRSC_SEM_A = 1; ! Upper case alpha or numerics only 
Literal CNRSC_SEM_F = 2; ! Parse string as if file specification 
Literal CNRSS-CNRDEF = 4: 
macro CNRS$V_SEM OFF = 0,0,8,0 %; 
Literal CNRSS_SEM OFF = 8; ! Byte offset from top of CNF to field 
macro CNRSV_SEM TYP = 0.83.0 x; : 
Literal CNRSS_SEM_TYP = 3; ' Field type (bit,string,byte,word etc) 
macro CNRSV_SEM ACC = 0,11,3.0 %; 
Literal CNRSS SEM _ACC = 3; ! Field access control 
macro CNRSV_SEM_RT = 0,14,1,0 2%; ! “Field” is actually an index of a routine to call 
macro CNRS$V_SEM_Z = 0.15,1.6 x: ! Set if field may be zero 
macro CNRSV~SEM-MAX = 0,16.16,0 2%; : 
Literal CNRES_SEM MAX = 16; ! Max value byte or word may be assigned 
macro CNRS SEM SAX = 0,16,12,0 %; : 
Literal Ch«SS_SEM_SMX = 133 ! Field to store max size string 
macro CNRSV_SEM TAB = 0,28,4,0 2%; : 
Literal CNRSS_SEM_TAB = 4; ! Holds i.d. of string parse table 


Define CNF$x_SEM_TYP values 


Literal CNRSC_MAX_INX = 95; ! Maximum field index possible (0 indexed => 96 indexes) 
Literal CNRSK_LENGTH = 680; ' Structure size 

Literal CNRSC_LENGTH = 680; ! Structure size 

IF EM_TAB,L,4*CNRSC_MAX_INX /* Semantic table 

i =also see CNFSL_MASK definition 

,] 

' 


The following defines the format of each entry in the semantic table 
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> 0121 Literal CNRSS_CNRDEF1 = 680; ; 
; 1 § o macro CNRSL_FCINK = 0,0 § 6 3; ! Forward Link : 
; 1 macro CNRSL_COLBTE = 6,6,32,0 i; ! Pointer to the collating tree entry for NDI CNR ; 
: 0124 0 macro CNRSL-BLINK = 4,0, ’ %; i Backward Link | ; 
; 125 8 macro CNRSL_NAMEBTE = 4 0,$2,0 a; ' Pointer to the name tree entry for NDI CNR : 
3 126 macro CNR$W_SIZE = 8,0 16.0 4; ' Block size ; 
; 4 5 macro pneeal Yee = 1546 a Pi ock, type (one of the NFBSC_DB_... codes) : 
: macro TFLG = 11,0,8.0 2; a s | ; 
; Oley 9 macro CNRSW_SIZ_CNF = 2:8.48.4 a; : $ize of associated CNF without ony string storage : 
; 0130 0 macro CNRSW_MAX_INX = 14,0,1 a; ! Maximum field index defined for this database : 
>; 0131 0 macro CNRSL_FLD_LOCK = 16,6,32,0 &:; ! $torage for bit id of conditional write gate : 
; 8 ; 0 macro CNRSL_FLD_COLL = ¢° 0 0%; ! Storage for collating bit i.d. : 
; oT 0 macro CNRSL_ACT_QI0O = 2 6,32,6 3%: ! Ptr to Q10 preprocessor for this database : 
; 0134 0 macro CNRSL_ACT_SHOW = 8.6. $0 i; ! Ptr to ‘show’ Q10 to a specific CNF ; 
3 8132 0 macro CNRS$L_ACT_DFLT = 32,0, %; ! Ptr to ‘defaulting’ action routine ; 
; 0136 0 macro CNRSL_ACT_INSERT = 36.0. -0%; |! Ptr to CNF ‘'‘pre-insert’’ action routine ; 
3; Gisr ® macro CNRSL_ACT_DELETE = 40,0,32,0 %; ! Ptr to CNF ‘‘mark-for-delete’’ action routine : 
3 Biss 8 macro CNRL AGT REROVE & 3" 9-3 4° i; au se ee "‘post-remove'’ action routine : 
; macro = 3 r to scanner ; 
>; 0140 0 macro CNRSL_INSERT = a 6 i 6 3; ! Ptr to CNF real insertion routine : 
; bpd 8 macro oe Sa = 36.6,32,0 &; : Ptr to CNF special scan routine : 
; macro = 0,0 %; : 
5 b148 0 Literal CNRSS VEC_ACT = 64: ! Vector of action routine pointers : 
> 0144 0 macro CNRSL_END_ACT = 124,0,32,0 %; ! Mark the end of the vector ; 
; 0145 0 — macro CNRSL~VEC-MAND = 128,6,0.0 &:; : 
3 Bieo 8 itera) Cunss vEC — = 96; 32.0% Vector of mandatory field i.d.'s : 
; macro 2 Ve : : ° 
; 0148 0 macro CNRSL_VEC_UNIQ = $33 0.0.6 x; ; : ‘ 
; 0149 0 eral CNRSS VEC _UNIQ = 64; ! Vector of i.d.'s of fields required to be ; 
; 0150 0 macro CNRSL_ERD_UNIQ = g9e 6,32,0 %; ' unique P : 
; 131 @ macro CNRSL_SEM_TAB = 6,32,6 x: ! Semantic table -- 4 bytes for each of 96 indexes ; 
: O1¢ 0 macro CNRSLESEM TABLE = 296,0,0,0 4; | ; 
; O17 8 Literal CNRSS_SEM_TABLE = 384; 1 ...Synonym to reserve the space... : 
; 0155 0 'ee® MODULE CNF *#* : 
$189 9 Confi tion Data Block (CNF) 
3 ! Configuration Data Bloc ; 
:; 0158 0 ; : 
; 0159 QO ! This is a general block structure used to carry a sub-block in the : 
; 01629 0 : cont igyret on data base of the NETACP. The CNF and sub-block : 
s 16) ® ! semantics for each component type are store in the associate CNR : 
; pio¢ 8 : described above. ; 
; 0164 0 Literal CNFSM_FLG_CNR = 1; : 
: 0165 Literal CNFSM_FLG_ DELETE = 2; : 
; 3166 0 Literal CNFSM_FLG_ACP = 4; : 
; 0167 0 Literal CNFSM_FLG_NOEXT = 8; 3 
: 0168 O Literal CNFSM_FLG_MRK1 = 18: “ 
: 318? 0 Literal ah oD = 32; : 
: in 9 Literal ENFSKILENGTH 36: ! Structure size 
; era . = 36; ! uctu : 
3 0172 0 Literal CNFSC_LENGTH = 36: ! Structure size : ; : 
: 17 ! Ff MASK ,L.CNRSC_MAX_INX/32 _ /* One bit in mask for each possible field. 3 
; \78 feetnes tasat eS field is active. : 
; era = 36; | ; 
: gies 8 macro CNFSL_FCINK = 0,0 3 0 i; ! forward Link , 3 
3 17 macro CNFSL_COLBTE = 6,632.0 &: ! Pointer to the collating tree entry for NDI CNF : 


12 
13-$e0-1984 33:90:97 “SbsbspBAdSStneraceComsinercri.r32i1-2% «13 


WO DOnNO UE wh— 


PMOMONONG os 


POPOPOPOPIPIPINIPO NIPPON PINOTY 


NDISL_S_NLI = 12,0,32.0 2; ! Line used if NDI is a ‘‘loopback’’ node 
macro NDI$L_S_PUS = 18.0 0 2; ! Priv user id 
macro NDIS$L_S_PAC = 20,0,32,0 2%; ! Priv account | 
macro NDISL_S_PPW = 24,0,32.0 2%; ! Priv password 
macro NDISL_S_NUS = 8. ° 8 2; ! NonPriv user id 
4 macro NDI$L_S_NAC = 52,0,32,0 2; ! NonPriv account 
5 macro NDISL_S_NPW = 6. 23.0 2%; ' NonPriv psw 
6 macro NDISL_S_RPA = 40,0,32,0 2%; ! Receive password 
7 macro NDISL_S_TPA = 44,0, q; ' Transmit password 
8 macro NDI$B-ACC = 48.0. 20 4: i Access switch (inbound, outbound,etc) 
9 macro NDISB_PRX = 49,0,8,0 %; ! Proxy access switch (inbound, outbound, etc) 
? macro NDISB-SNV = 50,0,8,0 2%; ! System node version 
§ : The following are for nodes to be downline-loaded or upl ine-dumped | 
macro NDI$B_SDV = 53,0,8,0 %; ! Service device type | 
| 
aol 


: 0178 9 macro CNFSL_BLINK = 4.0.32 g %; ! Backward Link : 
; 179 macro CNFSL_NAMEBTE = 4,0,52,U %; ! Pointer to the name tree entry for NDI CNF : 
: 0180 macro CNF$W-SIZE = 8,0 '6, £; i Block size ; 
: 0181 macro CNFSB-TYPE = 16,6 1; i Block type : 
i 018 macro CNFSB-FLG = 11,6 é. %; i Flags defined as follows: ; 
; 1 macro CNFSV-FLG_CNR = 11,0,1.0 %: ! Block is actually a CNR ; 
: Ie macro CNFSV_FLG_DELETE = {,1,1,6 %: ! Block is a temporary CNF or marked for delete ; 
0185 macro CNESV-FLG-ACE = 11,2,1.6 £; i Block is a catch-alt used by the ACP 
; 3188 0 macro CNFSV_FLG_NOEXT = {1°3°1,0'%; ' Block is used internally only. It is not to be . 
: tt t4 0 macro CNFSV-FLG_MRK1 = 11.4,1,6 x; i Special flags with different meanings for ea : 
ee 0 macro ENE SV EL G_ARKS = 11,5.,1.0 2; ! database. These flags are defined locally in module ; 
; 8188 macro CNFSV_FLG_MRKS = 11,6,1,0 2; ! NETCNFACT.MAR. : 
3 190 ! displayed to the "external" world, i.e., above the : 
; 0191 ! $010 interface. : 
3 8136 0 macro CNFSW_OFF_FREE = 12,0,16,0 2; ! Self-relative byte offset to free storage : 
; 0193 0 macro CNFS$W_SIZ_FREE = 14,0,16,0 2; ! Bytes left in CNF free storage : 
; 0194 0 macro ene Sung td USED = 16,0,16,0 %; ! Number of bytes used for ater ing strings , 
; 0195 0 macro CNF$W_ID = 1 0.16.0 &; ! Database dependent indentification data : 
>; 0196 0 macro CNF$W_BOOLEAN = 60 0,16,0 %; ! Storage for values of parameters of type ‘'bit’’ ; 
>; 0197 0 macro CNFSL-MASK = 24,0,0,6 2: : 
: 0198 0 Literal CNFSS_MASK = {2; ! see CNRSC_MAX_INX definition : 
; 0200 0 'ee® MODULE NDI *** : 
: psoi 0 : : 
; 0 4 0 ! REMOTE NODE INFORMATION , 
; 0203 0 : ° 
: 0206 0 : : 
; $344 8 The following are commonly defined for all nodes : 
; 0207 Q Literal NDISK_LENGTH = 108; ! $tructure size : 
; 0208 0 Literal NDISC_LENGTH = 108; ! $tructure size : 
; 0209 0 ! (used to down-lLine load a node which isn't : 
>; 0210 QO ! up on the network yet) : 
. a 0 Literal NDISS NDIDEF = 108; . 
3; 0 macro NDI$W_ADD = 0,0,16,0 2%; ! Node address - zero if NDI is for local node : 
; g 0 macro NDI$W_CTI = 2,0,16,0 2; ' Counter timer (units = sec) F 
; § 0 macro NDISL_CTA = 4,0,32 8 z; ! Abslute due timer for counters to be logged : 
i 9815 9 macro NDISLS_NNA = -0,82,0 8; i Name ; 
.. ¥ 0 : 
; 0 : 
3 ° : 
; 8 ; 
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; 5 macro NDISB_CPU = 54,0, 8 %; ! CPU type ; 
3 macro NDISB_STY = 55,0, i; ! Software type ; 
: macro NDI$W-IHO = 56.0,16,0 &: i Host address (input) ; 
3 8 macro NDI$W_OHO = 58,0,16,0 2%; ! Host address (output) | : 
3 9 macro NDISL_DAD = ° -0,32.0 2; ! Dump address ; 
: 40 macro NDISL_DCT = 64,0, i; : Dump count : 
3 41 macro NDISL_S_SLI = é 0.32.0 2; ! Service Line : 
: tg macro NDISL_S_SPA = 72,0,32,0 %; ! Service password : 
> 024 macro NDISL_S_LOA = 76,0,32,0 2%; ! Load file | : 
>; 02446 0 macro NDISL_S_SLO = 80,0,32,0 2%; ! Secondary loader ; 
> 0245 macro NDIS$SL_S_TLO = 84,0,32,0 2; ' Tertiary loader : 
; 8 $$ macro NDISL_S_SID = g. +3¢-0 2; ! Software ID ; 
: 4 macro NDISL_S_DUM = 92,0,32,0 2%; ! Dump file ; 
a & $8 8 macro NDISL_S_SDU = 38 i; : pecondary dumper ; 
: 8 4 macro NDISL~S_DFL = 106,06, $0 i; ! Diagnostic load file : 
: 29 4 macro NDISL_S_HWA = 104,0,32,0 2; ! WI hardware address for node : 
F 8 26 8 pone MODULE LNI *** : 
; 8 23 9 : LOCAL NODE INFORMATION : 
> 025 ; 
; 33 0 Define local node states : 
>; 0259 0 Literal LNISC_STA_ON = 0; ! Node available for general use : 
; 0260 0 Literal LNISC-STA_OFF = 1; ! Node shutting down, no connects allowed : 
; 8 61 0 Literal LNISC_STA_SHUT = ¢: ! No new connects allowed - shutting down : 
3 soe 0 Literal LNISC_STA_RSTR = 3; ! Wode available for outbound connects only 3 
3 $$07 8 Literal LNISC_STA_INIT = 4; ! State used for ACP initialization : 
: : efine the structure ; 

8 65 0 } Defi he CNF ; 
; 026 9 Literal LNISK_LENGTH = 80; ! $tructure size : 
; 68 0 Literal LNISC_LENGTH = 80; ! S$tructure size 3 
; 4 0 Literal LNISS LNIDEF = 80; 3 
3 0 macro LNI$W_ADD = 0,0,16,0 2%; ! Node address 3 
s Ger @ macro LNISB_STA = 2, 8.5 2; : ate : 
; i macro LNISB_ETY = 3,0, i; ! Local node type ; 
os: Oar, macro LNISW_MLK = 4.0.18.0 £; ! Maximum Links allowed : 
; 0274 0 macro LNISW_MAD = g. 16,0 2; ! Maximum node address : 
3 3 75 3 macro LNISW_MBU = 8.0,16,0 2%; ! Maximum transport buffers : 
3 6 macro LNI$SW_MCO = 10, 16,0 &; ! Maximum cost : 
3 7 macro LNISB_MHO = 12,0,8,0 2; ! Maximum hops : 
; A macro LNISB_MVI = 15,0,8,0 2; ! Maximum visits : 
r macro LNISB_MLN = 14,0,8,0 2; ! Maximum circuits (used to be called Lines) ; 
; 0280 macro LNISB_LPD = 15,0, i; ! Default LOOP data 3 
; 0281 macro LNI$SW_LPC = 16,0, 6.0 i; ! Default LOOP count $ 
; § macro LNISW_LPL = 18,0,16,0 2; ! Default LOOP Length 3 
; macro LNISB_LPH = § ° § 6 3: ! Default LOOP help type : 
; macro LNISW-BUS = 22,0,16,0 &; ! Transgort forwarding buffer size : 
; 5 ! (maxi size that we will receive and forward) : 
3 macro LNI$W_SBS = 24,0,16,0 2; ! Transport segment buffer size : 
; 8 ! (maxi size that | will transmit) 3 
; macro LNISW_RSI = 26,0,16,0 2; ' Routine supression interval (units = sec) 3 
; macro LNISW_IAT = 28,0,16,0 2% ! Inactivity timer (units = sec) : 
3 90 macro LNI$W_ITI = 50,0,16,0 % ! Incoming timer (units = sec) 3 
; 91 macro LNI$W_OTI = 32,0,16,0 2% ! Qutgoing timer (units = sec) : 
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macro LNISW_RTI = 34, 18. 2; ! Routing timer (units = sec) | 
macro LNI$SW_BRT = 36,0,16,0 2; ! Broadcast routing timer (units = sec) 
macro LNISW_MBE = 38, 1 i; ! Maximum broadcast endnodes 
macro rite = 2 0,1 ss } oy la broadcast routers 

macro ie = 42,0,8,0 2; ! Delay factor 

nacre tNISeORFA . rhe 8. t Seatlaseit’ lester 

macro LNI$SB_DAC = 45,0,8,0 2; } peroult access (inbound,outbound,etc) 
macro LNISB_DPX = t$- ° i; i Default proxy access (inbound, outbound,etc) 
macro LNI$W_PIQ = 47,0, g.0 i; : tah ne quota 

macro LNISL_SAD = 50,0, %; : sub-address range 
macro tnlgscam = $8:0°6-0 | Ada waxteue hops | 
macro LNISW_AMC = é. 16.0 &; i Area maximum cost 

macro LNIS$W_ALI = 16,0 2; ; bl ae address (cluster node address) 

macro LNISL_S_NAM = 60.0,82,0 2; | Node 

macro tNIStS"AvE . 64,0,32, a: Systen identification 

macro 0.32.0 2%; ; ve 
macro LNISL_S"RVE = 72,0,32.0 2; : aout ne version 
macro LNISL_S_MVE = 76,0,32,0 2; ! Network Management version 


| 
te#* MODULE LLI *#* | 
LOGICAL LINK INFORMATION | 

| 
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The following are commonly defined for all node counter blocks 


Node Counter Block (NDC) 


The tae ig data block is used to maintain statistics for each node in the 
network ash of these structures is contained in NETACP. 


literal NDCSK LENGTH = ‘ae ‘ 


Structure size 
Literal NDCSC_LENGTH = 28; ! $tructure size 
Literal NDCSS"NDCDEF = 

macro NDCS$L_ABS_TIM = 0, 


i Network 


macro NDCSW_RSE = 4,0,16,0 2; 
macro NDC$W_RTO = 6,0,16,0 2; 
macro NDC$W_CRC = 19 i; 

= 

= 

= 


°32,0 %; ' 
services layer counters 
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Trasmitted connect rejects due to resource errors 


| 
| 
Absolute time counter block was last zeroed | 
| 
| 


Response timeouts 
Connects received 


SOOQOOOOOOCOCOCOCOCOOOCOOOOOOOOOSOCOOCO COO OOOOOOOCOOOOCS BOOCOOOOCOOOCO 
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' 
' 
macro NDC$W-CSN 6. 16,0 &:; i Connects sent 
macro NDCS$L_BRC = 12,0,32,0 2: ! Bytes received 
macro NDC$L_BS 1. 230-0 2; ! Bytes sent 
macro NDCSL_PRC = § 0.32.0 8; ‘ Packets received 
? macro NDCSL-PSN = 24,0,32,0 2; ! Packets sent 
§ 7 The following are commonly defined for all logical Links 
4 Literal LLISK_LENGTH = 64: ! Structure size | 
5 titerat Natta irises S ti ! Structure size 
= 2 | 
39 macro LLISL_X08 = "6.0.38. 2; ! Pointer to XwB 
348 macro LLISW_LLN = 4,0,16,0 2; ! Local Link number 
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macro LLISW_PNA = 6,0,16,0 2; 


acro LLI$Z_NDC_RT = 8.9.0.1 i; 


! Partner's node address 


: Network services layer Running Total counters 


! Running total counters 


Network services layer Last Zeroed counters 


m 
Literal LLISS_NDC_RT = 
i 
! 


macro LLIS$Z_NDC_LZ = 36 9.0.1 %; 
Literal LLISS_NOC_LZ = 28: 


tee# MODULE OB] *** 
NETWORK OBJECT INFORMATION 


Define CNF storage 


Literal OBISK_LENGTH = 40; 
Literal OBISC_LENGTH = 40; 
Literal OBI$S yt = 40; 
macro 081$8_NOM = 0.8.0 %; 
macro OBI$B8_PRX = 1,0, i; 
macro OBI$W-CHN = 2,0,16,0 &; 
macro OBISL_LPR = 4°0°3 8 z; 
macro OBISL_HPR = 8,0 i; 
macro OBI$L_UCB = 12,6, $0 i; 
macro OBISL_PID = 16,0, %; 
macro OBISL_S_NAM = 20,0, 8 2; 
macro OBIS$SL_S_FID = 24,0,32,0 2: 
macro OBISL_S_USR = 8.8. 0 %; 
macro OBI$L_S_ACC = 32,0,32,0 2; 
macro OBISL_S_PSW = 36,0,32,0 2; 


pone MODULE CRI *** 
CIRCUIT INFORMATION 


i 
i 
i 
: Define CNF storage for 


! Last zeroed counters 


' $tructure size 
! Structure size 


Object number 


High order priv eee ma 
Associated NET UCB if d 


Name 
File id 
User id 
Account 
Password 


meme eee 


fields used internally 


1$eBto-1986 35:07:02 


Proxy login switch (inbound 
Channel over which declarat 
Low order privilege mask 


Associated process i.d. if declared task 


=32 V4.0-74 


CNETACP.OBJJNETCTL.R32;1 


outbound, etc) 


era sf = 65; : ructure size 
Literal CRISK_LENGTH = 65 ! $truct i 
Literal CRISC_LENGTH = 65; ! Structure size 
macro CRISL S7NAM = 0.0.39,0 t Cireute 
macro = 0,0,32,0 2; : rcuit name 
macro CRISL_ODPID = £9 3:8 i; ! PID of temporary owner of Line in service state 
macro CRISL_CTA = 8,0, 20°38; ! Absolute due time for counter logging 
: Define CNF storage for fields defined by the NICE protocol 
acro ik = 12,0,8,0 2; ! State 
m CRISB_STA = 1 z . § 
macro CRI$8_CHN = 15,0, i; ' x%.25 Channel No. 
macro CRISW-LCT = 14.0,16,0 &; ! Counter timer 
macro CRI$L_S_LOO = { 9 $2,0°%; ! Loopback name 
macro CRISW-HET = 30, 16,0 3; i Hello timer 
macro CRI$SB-COS = 24,0,8,0 %; i Cost 


12 


13-00-1984 38:87:09 


§ Pa 
NETCTL.R32;1 


macro CRISB_MRC = $2 +f 0 %; ! Maximum recalls 
macro CRISW-RCT = 26,0,16 8 £; ! Recall timer 
macro CRISL-S NUM = 28.0,$2,0'%; i Call Number | 
macro CRI$B8_POL = ¢: 78.0 4; ! Polling state 
9 macro CRISB_PLS = 35,0,8.0 2%; ! Polling substate 
1 macro CRISB_TYP = 34,0,8,0 2: : type 
i macro CRISL-S_DTE = $6, 34 %; ip | 
1 macro CRI Sve = 40,0,16,0 8; ! Maximum block | 
14 macro CRIS6_MWl = 42,0, 6 2; ! Maximum window 
15 macro CRISB_TRI = 43,0, i; ! Tributar | 
af macro CRISW-BBT = 44.0.16,0 &:; i Babble timer 
He ec Ot 6 | 
19 macro CRISB-USE = 50.0.8,0 %;— i x.25 Usage 
9 necro crise mre = 51,0, f a Rex jeus Peceive butters 
mac = 32.0.8.0 2; ! Maximum transmits 
¢ macro CRI$B_ACB = ¢° 28.0 2; ' Active base 
2 macro itt df = ¢ 8, a: active nerencnt 
macro = 55.0,8.0 2%; ! Inactive base 
5 macro CRIS$B_IAI = g. 08,0 %; ! Inactive increment 
§ macro the ol = 57,0,8, a; } ohio threshold 
macro = eVeSe Py H n ase 
8 macro CRI$B8_DY] = 5° 28,0 2; ! Dying increment 
8 macro CRISB-DIM = 61.0:8.0 £3 i Dead’threshold. 
macro = 61,0,8.0 2; ! Dea resho 
H macro CRI$B8_XPT = 66-0. $ %; : 
; macro CRISB_MRT = 65,0, 8 2; ! Maximum routers on NI 
macro CRISB_RPR = 64,0,8,0 %; ! Router priority on NI 
5 jou MODULE PLI *** 
5 PHYSICAL LINE INFORMATION 
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39 
rs Define CNF storage for fields used internally 
4@ Literal PLISK_LENGTH = 46; ! Structure size 
4 Literal PLISC_LENGTH = 46; ! Structure size 
44 Literal tag Sst ey = 46; 
45 macro PLISL_S_NAM = 8-9 2.0 q; ! Line name : 
+8 macro PLISL-CTA = 4,0, 2,0 2; ! Absolute due time for counter logging 
m3 ; Define CNF storage for fields defined by the NICE protocol 
20 macro PLISB_BEN = 8.0.8. x: Nuaber of buffers in receive pool 
macro = : : 
2¢ macro PLI$8_SUB = 16, ° 8 £; ! Substate 
5 macro PLI$SB_PRO = 11,0, i; ! Protocol 
54 macro PLISWILCT = 12. 16,0 &; i Counter timer 
55 macro PLI$SW_STI = 14,0,16,9 2; ! Service timer 
28 macro PLISW_HTI = 16,0,16.0 2: ' Holdback timer 
3 macro PLISW-ABL = 20:0.16,0. 13 | Resjnm block” 
macro = 20,0, 3 : x 
33 macro pL se aT = 22, $4 a: } Rex joue r cronenits 
macro = Ve . M axiaum window 
61 macro PLISUCSLT = 26,0, 0 i; i Scheduling timer 
62 macro PLI$W_DDT = 26,0,16,0 2; ! Dead timer 


Transport protocol 
| 
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13-Fep-1984 4 33:85:99 VES SSpOAE CHE TACE OBJSNETCTL.R32:1° 2% ( 


macro PLI$W u DL LT = gp. 16. 2; ' Delay timer 

macro PLISW_SRT = on q; ' Stream timer 

macro Matte et WA = ; ° 4 -O 2; ! WI hardware " address CREAD ONLY) 

are Sati ie D ri BTS %; Ais. Kn protocol typ duap file CWRITE ONLY - ONE SHOT) 
m QO, 3 rnet protoco 

macro PLISB_MOD = a9: § 6 3: ! X25 mode (DT Se DCE” 

macro PLISW_BFS = 44,0, 6,0 {; ! Buffer size to aonbiae eae buffer size 


:ee* MODULE EF] eee 
' 
EVENT LOGGING FILTER INFORMATION 


FRELLLERLLLLELE 


SISISAH NSS E SOS, 


! 
! 
i 
Define the CNF structure 


04 Literal EFISK_LENGTH = 28; ! $tructure size 
04 Literal EFISC_LENGTH = 28; ! Structure size 
Be Literal EFISS EFIDEF = 28: 
3) macro EF I$W_SIN = 0.) $ %; ! Sink node address 
8 § macro EF I$W_SP1 = 1 z; ' 
8 macro EFI$L~B81 = 4,6, g.6 %; : 
04 : macro ce ietoee = 8.0, 6° i; } For user defined use 
be macro EF Ist ns . 1 0. z ie i yl, Pee use 
8 7 o EFI$L_S_SB2 = a ° 8 %; ! for user defined use 
be : necro EFIS$L-S-SB3 = 24,0,32,0 2%; ! for user defined use 
90 


peee MODULE ESI *** 
EVENT LOGGING SINK INFORMATION 


FERRER 


SOOOSOSOOOOOOOOOCOOSOOOSOSSS SOOO SOSOSOOSOOOOOSOOOOOOOCOOOOOOCOOOCOOOO 


pare 
For user defined use 
| 


1 
' 
! 
: Define logging sink states 
Literal ESISC_STA_ON = 0; : Logging is on 
98 Literal ESISC“STA_OFF = 1; i Loaging is off 
+44 Literal ESISC"STA_HLD = 2; ! events 
301 Define logging sink types 
0808 Literal ESISC_SNK_CON = 1; ! Console 
504 Literal ESISC"SNK-FIL = ¢: ' File 
505 Literal ESISC_SNK_MON = 5; ! Monitor 
H 5 Define the CNF structure 
269 Literal ESISK_LENGTH = 28; ' $tructure size 
510 iteral ESISC"LENGTH = 28; ! Structure size 
a1 Literal ESISS ESIDEF = 28; 
\ macro ESI$8_SAK = 0,0,8,0 %: ! Sink type 
51 macro ESISB_STA = 1,0, z; : sims ¢ ate 
514 macro ESI$W~SP1 = 2.0.16,0 &; i Spar 
515 macro ESI$L_61 = 4.6, g.6 2; ' for user defined use 
218 macro ESI$L_62 = 8, i; ' for user defined use 
51 ESISL~S_LNA = 12,0,32.0 2: i Sink name 
218 ESI Bi = 16,0,32,0 2; ' for user defined use 
51 ESI B2 = 20,0,32,0 2; ' for user defined use 
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macro ESIS$L_S_SB3 = 24,0,32.0 2; ! for user defined use 


!eee MODULE SPI eee 
' 
NETWORK SERVER PROCESS INFORMATION 


Define CNF storage 


Literal SPISK_LENGTH = 32; ! $tructure size 
piteres SPISC_LENGTH = 32; ! Structure size 

iteral SPI$S wry = 32: 
macro SPISL_PID = 0, 3 0 %; ! Server PID 
macro SPISL_IRP = 4,0,32,0 2; ! IRP of waiting DECLSERV Q10. 0 if process active 
macro SPIS$W_RNA = 8,0,16,0 %; ! Remote node address which initially started pecyer 
macro SPIS$W-CHN = 106 g.16 i; i Channel associated with L_IRP (waiting DECLSERV 
macro SPI$L~S_ACS = 12,0,82.0 2: i ACS used initiall y to start server process 
macro SPISL_S_RID = 16,0,32,0 2%; ! Remote user ID which initially started server 
macro SPISL_S_SFI = 20,0,32,0 2; ' Last (current) filespec given to server 
macro SPISL_S_NCB = 24,0, 8 2; ' Last (current) NCB given to server 
macro SPISL_S_PNM = 28,0,32,0 %; ! Last (current) process name given to server 


twee MODULE WOE eee 
i 


Work Queue Elements (WOE) are used by the ACP to serialize and standardize 
all schedulable but non-IRP oriented work. Datalink state transition 
control and events originating from ASTs are examples. 


The WQE structure is depicted below. The WQE$B_ SUB field is used to 
determine if any special processing is needed when the WOE is queued or 
dequeuved as follows: 


iteral WOESC_SUB_BAS = 0; ! The WQE is the base of a List - NOTE low bit clear 
for this SOB constant only!!! 
stores yeese _SUB_ACP = 1; The WQE was spawned during normal internal ACP 
activi ec aL é.9. during. 10$_ACPCONTROL ‘aio activit ty. 
al action is required when it is queue 
When it > equeved, dispatch directly to the action 
routine vba responsible for deallocating it. 


i 
i 
i 
i 
i 
i 
i 
i 
i 
' 
i 
i 
' 
i 
i 
i 
iiteral woesc SUB_AST = 3; ! The WQE is the consequence of a miscellaneous AST, 
| e.g.. ad datal ink Qio AST. If its the first entr ry 

i ued then SWAKE the ACP. When it is dequeue 

i —~ 4, directly to the action routine - chick 4 is 
responsible for deallocating it. 

i 

' 

i 

i 

i 

i 

' 

i 

i 

i 


iteral WOESC_SUB_MBX = 5; ! The WQE is the consequence of a mailbox read AST. If 
it is the Tirst element queued then SWAKE the ACP. 
When it is dequeved, it is sent to the mailbox 
servicing routine - which permenantly owns the WQE. 


iteral WOESC_SUB_TIM = ' The WQE is the consequence of a timer AST. If it is 
the first Glenént se then SWAKE the ACP. When 
eo anoth er VM mer must be set if there are 
elements in he WOE timer quyve, 


iteral mUOESC QUAL _DLL A. 1; A data Link event - REQIDT is the LPDSW_PTH value 
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Literal WOESC_QUAL_RTG = @: 
Literal wa Sh UAL CIR = 5; 
Literal WQESC_QUAL_ACT = 4; 
Literal WOE Sk LENGTH = 36; 
Literal WQESC_LENGTH = 36; 
iteral WOESS WOQEDEF = 36: 
macro WOESL_FCINK = 0.0,32.0 3: 
macro WOESL_BLINK = 4 z; 
macro WOESW_SIZE = $ 6 16.6 %; 
macro WOESB-TYPE = 16,6 : 
macro WOESB-SuB = 11,06,6,6 2; 
macro WOESL_ACTION = 12,0,32,0 %; 
macro WOESL_PM1 = 16.0.8 0 &; 
macro WOES$B-EVT = 16.0.8,0 2; 
! QUAL fie 


macro WOESS QUAL = 17,0,8,0 %; 
macro wo REQIDT = 18,0,16,0 &%; 
UAL” f 


! the Q 

macro WOESL_PM PME = oe 0,32,0.% 

macro WOESL_E = 24,6, 33 0 %; 
! for even “odin 7 

macro WOQESW_EVL_CODE = y 0,16,0 2%; 
macro WOESB_EVL_DT1 = 0.6, 0 2; 
macro WQESB_EVL_DT2 = 8°o s 


macro WOESW_ADJ~ INX 0°14 
macro WOESW_SPARE = 5.34.9 6,0 


peer MODULE DLLQIO *** 


DLLQIO = Datalink $Q10 parameter block 


literal DLLQIOSK LENGTH = 3a 
Literal BLL aT OSC LENT : 
Literal DLLQIO$S 


fees MODULE DEVTRN eee 


DEVTRN = Device translation table 


Literal DEVTRNSC_ DEV_UNK = 
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15-Fep-1984 B3:b0i97 — “SSsdenBade tage omsonercre.e32;1 2% (15 
DT is alwa ays zero 

I identifies data base 


T 
f data area 
f data area 


ACP routing event - REQI 
A" counter timer event = REQ 
The ACP active timer 
Structure size and begining 
Structure size and begining 


Queue forward tin, 

Queue backward Link 

Bytes allocated for the WQE 
Structure s7pe ss code 

Structure sub-type code as follows: 


T 
D 
° 
) 


Action routine address 
Action routine first parameter 
Event code - interpreted in the context of the 


REQIDT qualifier as follows: 
Request identifier - interpreted in the context of 


Action routine second parameter 
Ptr to the packet header if the WOE is being used 


Event logging code if WOE is used for event logging 
Event logging immediate dat . 
Event logging immediate dat 

oe ipeeney to which this wae "ssettes (0 if none) 


tructure size 
tructure size 


P2 parameter 
PS parameter 
P4 parameter 
PS parameter 


nena device 


MC 

PCL-11 

DMF - 

Cl-7 

DMP-11 

DUP-11 (for X.25) 

ee (for X.25) 

x.25 datatink’ (datalink mapping) 
DEUNA (Ethernet) 
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Literal DEVTRNSC REV _PPUNA = 10; 

' Cingernat test ing Wee s only!) 
Literal DEVTRN tin GTH 

literal 4 VTRN TH = 

Literal DEVTRN 

literal D 4 AL s~ 


macro DEVTRNST_ 
Uteral DEVTRNSS 


te MODULE NDB eee 
“NDB = DEFINE OPCOM MESSAGE CODES 


' - 
i Message codes. for OPCOM 
Literal SC_MSG_START = 1; 
literal NDBS$C~ “ASen SHUT = 2; 


OBJ INETCTL.. R32; ° 
DEUNA ler in point-t scat mode 

Structure size 

Structure size 

Count of Network Management device name 


Network Management device name text 
Count of VMS device name 


VMS eouneg name text 
Default device ecesgees (NMASC_LINPR.. 


Device characterist 
Multi-unit device 


Cnet starting 
Cnet shutting down 
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i Created 15-SEP-1984 23:06:24 by VAX-11 SDL V2.0 Source: 15-SEP-1984 22:47:47 _$255$DUA28: CNETACP.SRCINETN 


' RERAKEKEAHARETAKeARAAAeHAAAAAAKeKAKAAATATH TATRA A AEH A eRAAA AAA AAAAAA HAH eRAAAAA AeA RAATAAeeATATAeeeeeeteeeeeeeeeet 


twee MODULE RCB tee 
Htsrat Repte 
era = 2; 
Literal RCBSC-CNT SIZE =_12; | Number of bytes used for counters 
Hiseat RSBSECLENETA © 7 Y Brees ois 
era = : ructure s ze 
' an unspec tied output gdjacency (ETY=PHG only) 
Literal RCB Sa RCODET = 4? ‘0.0% 
Titeral R ass inh FheE o-8: eae ! Listhead of free IRPs 
macro RCBSW_SIZE = 8,0,16,0 %: ! Bytes allocated for structure 
rere Ree tyafus 119 :0°8,0°% i Satie’ ttageee 
m4 ° e . oO . 
2acro RCBSV-LVL2 = 11,0,1,0 2%; ! True if w “yt n use level 2 routing (AOA, etc) 
macro RCBS$V-ACT = 11,1,1,6 &; i (ROUTING LAYER BIT) Set if NETACP is considered active 
False if-we detect that we are an isolated area router 
macro RCBSW_TRANS = 12,0,16,0 %; ! Qutstanding transaction count 
macro RCBSU-AD R = 144 {6,6 3; ; Local anode address 
macro = 16, 3 ‘ 
macro RCBSL_ACP_UCB = 5-8 $°6 %; ! Ptr to Network ACP's UCB 
macro RCBSL_PTR_JNX = 24 %; ! Ptr to journal buffer 
macro RCBSL_PTR_OA = 2 6, 52,6 2: ! Ptr to Output Adjacency vector 
macro RCBSL_PTR_AOA = 46, 0 &: ! Ptr to Area Output Adjacency vecto 
macro RCBSL_PTR_LTB = 36,0,32.0 2%; ! Ptr to logical link table (dispatch vector) 
macro RCBSL_PTR_LPD = 40,0, 8 %; ! Ptr to Logical Path Descriptor vector 
macro RCBSL_PTR_ADJ = 44,0,32,0 2; ! Pointer to vector of edjacenc blocks (0 based) 
macro RCBSL_PTR_TQE = $8. " 8 2; ! Ptr to internal Timer Queue element 
macro RCBSL_PTR_NDC = 52,0,32,0 2; ! Ptr to Node Counters vector 
macro pceel 7 rnp es = 28°88 6°s" ! Ptr S NETDRIVER's control storage 
= e e Py 
literal RCBES LOC RCV iat set ! Receive Listhead for ‘‘local’’ Datalink 
macro Ve Py 
Literal RCBSS_LOC ‘0, 8.0 & Transmit Listhead for ‘‘lecal’’ Datalink 


ro 
_ 
Lad 
@ 
2 
@ 
a 
<a5 
Sad 
40 
i and 
aa 
ak 
o> 


! Listhead of fork precesece waiting for an IRP 
macro RCBS$W_MCOUNT = 84, “0, 6, 0 %; ! Mount count - includes current Logical Links plus 1 


! for the "ACP referen € 

macro RCBSW_CUR_LNK = 9 0.16. 2; ! Current number of te ‘get, itehe 

macro RCBSW_MAX_LNK = 19 z ! Max allowable Logics 
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macro RCB$B_MAX" SNK = iy ¢. eB ! Max IRPs HBS, 4g ony 9 sink queue 
macro RCBSB_MAX_VISIT = $4°0.8.0 3; ! Max nodes a packet may visi 

macro RCBSB_INT_PTH = 95,0,8,0 2; ; index of path to intercept rode O=>no intercept 
eg a Ro a 

macro 0, : : 

macro RCBSB_ECL_RFLW = 6.0,8,0 %; ! ECL receiver ptget ine quota (in packets) 
macro RCBSB_ECL_RFA = 99 6.8.6 x: } ECL retransmit factor 

macro REBSEECL-BUP  10i70:8:9 fF Eek etsy welont 

macro RCB$B_ECL_DAC = 1 ¢° °8.0 3: i ECL default access state 

macro RCBSB_ECL_DPX = 105,0,8,0 2; ! ECL default proxy access state 
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+ CxBs 
neene RCB acy 
macro RCBSW 
macro RCBSH PRY 
macro RCBSW_PKT_ p 
macro RCB 
macro RCBSB_ =AER. Fal 
macro RCB$B_ETY 
macro RCB$B_ “HOMEARE 
macro RCB$B_MA 
macro RCBSW WTALIKS 
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macro RCB$B_ACT “TIMER = 


: Transport 
macro RCBSL_ABS_TIM 


macro RCBSW_CNT_MLL 
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i End of transport counters 


macro RCB$Q_CXB ay = 16 


Literal Rcess CXB 


-0,0,0 %; 


° %; 
ERR z; 


FREE = 
LSN wie = 168, 
macro Matt “hoe CNT s 

RC e peaeg 


943° 6° 5, a %; 


Dee «* 

= 

°o 
EE 


with an areees! 38. guepur ed adjacency ,; 


TR . RCBSW_LV 
jee MODULE LPD *** 


Logical Path Descriptor 


(LPD) 


Sep-1984 

Soden 196s 23:07:08 

Size of adjacency vector (PTR_ADJ), in entries 

Y mber of “rout ng des inations (LPDs + BRAS) 
Linked List head for d veers weurtee cess XWBs 

in oye ey oe before next vous ng update in seconds 

Max t ng before . routing update in seconds 

Max jo cal Link inactivity Starved in seconds 

Max inbound connect interval in seconds 

Max gut ound connect interval in seconds 

Sample interval in seconds 

perguce elas data segment size (excludes header size) 
~~ bad ze including NSP header + 6 bytes 


a total IRPs 

Max total IRPs 

Packets left in Transmit pool 

Peak number of packets used 

Packet allocation failures (over packet quota) 
Packet allocation nat lucee ‘neuf icone memory) 
Type of executor node (ADJSC_PTY_xxx) 

Our home area number mt | ‘7 an router) 

Max allowable area addres 

Alias local address ( i? none) 
ACP activity timer 
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Absolute time counters were last zeroed 
Node out-of-range paeses oss 

First counter cell marker 

Aged packet loss 

Oversized packet loss 

Packet format error 

Partial routing wpeate loss 

Verification rejects 

Node unreachable cocker loss 

Xmitted connect resource errors (ECL layer counter) 
Maximum logical Links active ‘ECL layer counter) 


Free CXB Listhead 

Current position in ADJ for Listener processing 
Count of entries on AQ 

Designated router ADJ index for all transmits 


Level 2 router ADJ index for all transmits with 


The following control block Sovcr ides a path to a data sink/source -- either 


ver (e.g., NETDRIV 
Literal LPDSC_LOC_INX = 1; 


] 

1! 

' 

: atalink driver (e.g. 
ord iveas.* 
l 


RIVER) or an end communications level (ECL) 


Index associate with the primary ‘‘local’’ LPD 
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; 0773 0 ' : 
; 0774 0 : Status on control info : 
s Gre ® : ; 
; b7re 0 Literal LPDSM_ACTIVE = 1; ; 
; 077 8 Literal LPDSM-STRTIM = 2; ; 
; 0778 Literal LPDSM_DLE = 4; ‘ 
; 0779 0 Literal LPDSM_ACCESS = 8; : 
; 0780 0 Literal LPDSM_RUN = 18: ‘ 
; 0781 0 Literal LPDSM_XBF = 32; ¢ 
; ores 0 Literal LPDSM_RBF = 64: ; 
; 0783 0 Literal LPD$M-x2e5 = 128; ; 
: 0784 0 Literal LPDS$M-X25BLK = 256 ; 
: 0785 0 Literal LPDSM-INCOMING = 512; : 
>; 0786 0 Literal LPDSM_BC = Loses ; 
: 0787 0 Literal LPDS$M_XEND = 2048; : 
; 0788 0 Literal LPD$M_TOGGLE = 4056; : 
; 0789 0 Literal LPDSM_ALIGNW = oli : 
: 0790 0 Literal LPDSM~ALIGNQ = 16384: : 
; 0791 0 Literal LPDSM_ELECT TIM = 32768; : 
; 0792 0 Literal LPDS$MXMT_DALLY = 1; : 
; O795 @ Literal LPDSM_XMT_STR = 2; : 
>; 0794 0 Literal LPDSM_XMT_VRF = 4; ‘ 
: 0795 0 Literal LPDSM-XMT-IDLE = 8; : 
; 0796 0 Literal LPDSM_XMT_RT = 16: ‘ 
: 0797 0 Literal LPDSM-XMT-HEL = 32; : 
; 0798 QO Literal LPDSM_XMT_ART = 64; ; 
>; 0799 0 Literal LPDSM_PVC_ACCESS = 1; ‘ 
: 0800 0 Literal LPDSM_PVC_RESTRT = 2; ‘ 
; 0801 OQ Literal LPDSM_PVC_RESET = 4; ‘ 
; 0802 0 Literal LPDSM_FILC_2 = 120; ; 
>; 0803 0 Literal LPDSM_PVC_ACCESSED = 128; ° 
: 0804 QO Literal LPDSC_CNT_SIZE = 22; ! Number of bytes used for counters : 
; 0805 0 Literal LPDSC_SRM_NODES = 32; ! Number of nodes per se ment (bit) : 
>; 0806 0 Literal LPDSC_SRM_SHFT = 5; ! Bit shift for node<->bit ‘ 
; 0807 G Literal LPDSC-SRM-SIZE = 32; ! Number of bits in SRM bltmask (allows for 1024 nodes) : 
; 0808 O Literal LPD$C"ASRA_AREAS = 64; ! Number of areas per segment (bit) : 
; 0809 0 Literal LPDSC_ASRM_SHFT = 6; ! Bit shift for area<->bit : 
; 0810 QO Literal LPDSC_ASRM SIZE = 1; ! Number of bits in ASRM bitmask (allows for 64 areas) ; 
; 0811 0 Literal LPDSK-LENGTH = 106; ! Structure size : 
s OB8l2 9 Literal LPDSC_LENGTH = 106; ! Structure size : 
; 0813 0 Literal LPDSS-LPDDEF = 106; : 
> 0814 0 macro LPD$Q_REQ WAIT = 0,0,0,0 %; , hal : 
; 0815 0 Literal LPDSS_REQ WAIT = 8; ! Listhead of fork processes waiting for a ‘request’ : 
3 pate 8 ! slot on the LPB pink queue. : 
; 81; macro LPD$W_SIZE = 8,0,16,0 2; ! $tructure size : 
; 0818 0 macro LPD$SB_TYPE = 10,6 8.0 2; : Structure type a" : 
>; 0819 0 macro LPD$B_STARTUPS = 11°0,8.0 %; ! Number of datalink startup attempts since Last ' : 
; 0820 3 macro LPD$SL_WIND = 12,0 32.6 &; ! Driver context - WIND field image for IRPs : 
; ©0821 macro LPDSL_ = "8 6,$2,6 x: ! Driver context - UCB address : 
; pes¢ 0 macro LPDSW_ = 26,6,16.0 &: : ACP channel to device : 
: 0823 0 = macro LPDSW_TIM_TLK = 2,0,16.0 &; i Talker’ timer | : 
> 0824 macro LPD$W_INT TLK = 24,0,16,0 2; ! Talker’ lacorvet (used to init TIM_TLK) : 
; be5e 0 " re Lpose_tsTe T = 26,6,8,0°2:; ! Numder of test messages left to send before entering : 
: € State 3 
; O859 6 macro LPD$B_ASTCNT = -0.8.0 %; ! Number of outstanding ASTs | F 
: 0828 0 macro LPD$B_IRPCNT = 28,0,8,0 2; ! Number of outstanding IRPs queued by NETDRIVER 3 
; 0829 0 macro LPD$SB-ETY = 29,0,8,06 &: ! Our node type, on this circuit | 3 
| 
| 


if-te 90071982 $8i0G:5s ENE TALE SOS INE SNDAGeD 2s 1 Page 5 


; oe 8 macro LPD$B_XMT_SRL = 39-0 .8.8 %; : Output "square root Limiter’’ value ; 
; 08351 macro UPD Se _xnT IPI, = 3) 2; ; putpus queue ‘‘input packet Limiter’ ‘ 
; § macro LPDSWIPTH™= 32,0,16,6 &: ' e 
: 08 macro LPD$B-PTH_INX = 3.6.8.0 %; i Path nex. : 
> 0834 macro LPD$B_PTH_SEQ = 0 %; ! Path sequence 6 
; 0835 macro LPD$W_STS = 34, 16,6 &; ! Status Bits as follows: ° 
; macro LPD$V_ACTIVE = 4,0:1,0 %; ! Path is active ° 
: 08 0 macro LPDSV_STRTIM_= 34,1,1,0 2%; ! Set if restart supression timer is ticking ‘ 
; 0838 0 macro LPD$V-DLE = 34,2,1,6 &: : Set if in ute for physical Line service ‘ 
; 0839 0 macro LPDS$V_ACCESS = £.3.1,6 %: ! Set if LPD is bei ng Naccessed’’ by a server process ‘ 
; 0840 0 macro LPDSV_RUN = 4.4.1.6 &; ! Set if active and in use for normal data msgs ‘ 
>; 0841 8 macro LPDSV_XBF = 34,5,1,0 %; ! Set if Xmitter uses buffered 1/0 ‘ 
; baeg macro LPDSV_RBF = 34,6,1,0 %; ! Set if cege*ver uses buffered 1/0 ‘ 
>; 0843 0 macro LPD$V_X25 = 34,7,1,0 %: ! Set if X.25 datalink mapping used on this circuit ‘ 
>; 0844 0 macro LPDSV_X25BLK = 34,6.1,0 2: ! Set if blocking requested for X.25 datalink ; 
>; 0845 0 macro it ag = $4°9°1,0'%: ' Set if X.25 circuit waiting for sneenrog call ‘ 
>; 0846 0 macro LPD$SV~BC = 34,10,1,0 &; : Set if circuit is a broadcast circuit (NI) ‘ 
; 0847 0 macro LPDSV-XEND = $4,11,1.0 2%; ! Set if ‘’send hello msg to all endnodes’’ is requested ° 
>; 0848 0 macro LPD$V_TOGGLE = $4.1¢.1.0 %; ! Set if Listener timeout on DMC Line (toggles Line) ‘ 
> 0849 0 macro LPDSV_ALIGNY = 34,15,1.0 2%: ! Set if datalink requires word alignment : 
; 0850 0 macro LPDSV_ALIGNQ = 34,14,1,0 2%; ! Set if datalink requires quadword alignment ‘ 
; 0851 O macro LPD$V_ oEL ber TIM_= 34 15,1,6 x; ! Set if election suppression timer ticking ; 
3 pees 0 macro LPDSB_XMTFLG = 36,0,8,0 2; ! Xmit fla . -- since a FFS is used to schedule message : 
; 0855 0 : tranginission, the order of these flags are cruc ‘ 
>; 0854 0 macro LPDSV_XMT_DALLY = 36,0,1,0 2%; ' Dally before sending a start msg (must preceed STR) : 
; 0855 0 macro LPD$V_ XAT “STR = 36-318 q; ! mit a Transport start ; 
: 4] 0 macro LPDSV_XMT_VRF = 36,2,1,0 %; : Xmit a Transport verification msg ‘ 
; 0857 0 macro LPDSV_XMT_IDLE = 36,3,1.0 i; ! Signals ‘'no more Transport init messages to send"’ | : 
; 0858 0 macro LPDSV_XMT_RT = 36,4,1,0 2%; ! Xmit a Transport routing message : 
; 0859 0 macro LPDSV_XMT_HEL = 36.3.1.0 {; ' Xmit a Transport hello message : 
; 0860 0 macro LPD$V_XMT-ART = 36,6,1,0 %; ! Xmit a Transport Area routing aesnope . 
>; 0861 O macro LPD$B_P PVCFLG = 37,6,8.6 x; ! ¥X.25 PVC startup flags -- since a FFS is used to : 
: 0862 0 ! schedule it, the order gt these flags ore crucial ; 
>; 0865 0 macro LPDS$V_ pve ACCESS = 37,0,1,0 %; Issue an I10$_ ACCESS to establish the connection : 
> 0864 0 macro LPD$V_PVC_RESTRT = 3 1,1,0 83 Issue a ‘restart confirmation’ : 
>; 0865 0 macro LPD$V_PVC"RESET = ; 2,1,6 2; ! Issue a “‘reset’’ or ‘reset confirmation’ : 
> 0866 0 macro LPDSV-FILC_2 = 37,3,4,6 &; ; 
; 0867 0 Literal LPDSS FICL_2 = 4; ! (reserve low 4 bits for state, 3 more bits unused) 3 
; 0868 0 macro LPD$V PUC_ACEESSED = 37,7,1,0 %; |! True if PVC ACCESSed ; 
; 0869 0 macro LPD$B8_STI™= 38,0 §.0 %; ! Internal state used by the ACP for initialization : 
; 0870 0 — macro LPDSB-SUB_STA = $9'0,8.0 % i Circuit sub-st | : 
; 0871 0 macro LPD$B_PLVEC = 40,0,8,0 2; ' Associate PLVEC. ae 3 
: 0872 0 macro LPD$B_COST = 41 6,8,6 x: ' Circuit cost | : 
; 0873 0 macro LPD$8 -BCPRI = 43.6 8.0 k; ' Circuit NI router priority 3 
; 0876 0 macro LPD$W_DRT = 44, 18.0 ! Designated router on NI R : 
; 0875 0 macro LPDSL_RTR_LIST = 0, 33,0 ! For BC LPDs, address of ‘most recently received ; 
>; 0876 0 ! election” mestege’ eon’ oe be hello messages 3 
; 0877 0 ! (stored as an pre-gounted § gtging) ; ; 
; +44 8 macro LPDSL_RCV_IR 0 ! Address of suspended receiver IRP ; 
3 0880 8 Transport layer counters : 
; 0882 0 macro LPDSL -ABS_TIM = 54, 325 ! Absolute time counters were last zeroed : 
; 08835 0 macro LPDSL_ cnt ant = 58,0, ! Arriving packets received 3 
; «©0884 8 macro LPD$B_CNT_1ST = 58,0, ! First counter cell marker F 
3 1H macro LPDS$L~ ENT TPR = g+0- ie MH t ! Transit packets received | : 
5:7..@ 0 macro LPDS$L_CNT_DPS = 0, ! Departing packets sent : 
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; ert macro LPDSL_CNT_TPS = 70,0,32.0 %: ! Transit packets sent : 
: 888 macro LPDSW_CNT_ACL = 74,0,16,0 2%: ! Arriving congestion loss | ; 
ABD § RES UPROMISE ARRIGO | Hanis cenaea om Uom bot 
; = 78,0,8,0 2: ne down e ; 
; 4 8 macro LPDSB_CNT_IFL = 79 £3 i; : Initialization f failures : 
; +93 4 sere creat eae = 00.0.10.0 8: + le Cates 1s wer rer size including Transport overhead ; 
; 894 8 macro LPD$B_SRM_POS &3 0 8 0%; ! Current position in transmit XMT_SRM bitmask (bit !) ; 
> 0895 macro LPDSB- SR LEFT = 10°84 i; ! Number of transmit XMT_SRM bits Teft to check/process : 
; 0896 0 macro LPDSB_A nee = 8 0,8,0 %:; ! Current position in transmit XMT_ASRM bitmask (bit !) : 
: +944 8 oe LPbSG= SRN = 5 ae 0°3 38° 5,6,8.0 0 &; ! Number of transait XMT_ASRM bits left to check/process ‘ 
3 0899 4 Literal LPD Shit = : ou ‘ 2.3 jo ! (32/8) ; "Send routing message” flags (one per segment) | : 
; 449 8 Uiteral LPDSS XAT am O 0. 43 0x: ! Copy of SRM flags used for rtg msg transmission | ‘ 
: Bonz 8 Literal Leoss ahSRi = d;° 98.0.32,0 2: ! (1/8); "Send area routing message’’ flags (one per segment) : 
; = ; : 
>; 0905 QO Literal Ppsse XAT -ASRM = q.° ! Copy of ASRM steas used for rtg msg transmission | ; 
; 44 8 macro LPDSL_ CRCHEN= 102,0,32,0 %; ! Address of endnode cache storage (endnodes only? : 
: 0908 0 teee MODULE ADJ *## | 3 
; 9909 0 ‘ : 
: Bao 8 Adjaceny Node Data Base Block (ADJ) | : 
; 8318 0 i This block describes the contents of the Adjacency Node Data Base. The ‘ 
5 a4 0 ! Adjacency Node Data Base is used in conjunction with the LPD data base ; 
; bors 4 to describe the destination to any node in the network. : 
: 0916 0 literal ADUSM_ INUSE 5 1; : 
>; 0917 0 Literal ADJSM_RUN = 2; 3 
: 3318 0 Literal ADISMRTG = 4; : 
; 0919 0 Literal ADJSM_LSN = 8; : 
3 base 0 Literal ADJSC_PTY_UNK = -1; ! Node t is unknown : 
; 0921 0 Literal ADJSC_PTY_PH3 = 0; ! Phase 11 full routing : 
: 0922 0 Literal ADJS$C_PTY-PH3N = 1; i Phase III non routing : 
3 83 0 Literal ADJSC_PTY_PH2 = 2; ! Phase Il : 
3 $34 0 Literal ADJSC_PTY_AREA = 3; ! Phase IV area routing ; 
; 0925 0 Literal ADJSC_PTY_PH4 = 4; ! Phase IV routing : 
> 0926 0 Literal ADJSC_PTY-PH4N = 5; i Phase IV non routing ; 
: 0927 0 literal ADJSK_LENGTH = 1 ; ! $tructure size : 
; 0928 0 Literal ADJSC_LENGTH = 1 : ! $tructure size | 3 
; 0929 0 Literal ADJS$S— ADJDEF = 13; 3 
3 8 i] 8 macro ADJ$B8_STS = 0.0.8.0 %; ! Status Bt : 
3 934 macro ADJ$V_INUSE = 0,0,1,0 2%; ! <Adjacency Block in use : 
; a4 0 macro ADJ$V_RUN = 0,1,1,0 2; ' Ad ecency is up (can transmit_pkts over it) 3 
| BBB SSerS ABBE = 8:8:1°9 B | CRSKGR"etber feUbteRinges, uS-Pnae} Pinned aod 
; 0936 0 accra Ab Ise _PLYPE 51-0180. 3: Type of partner node Peutine, non-routing, etc.) ‘ 
3 macr * = 2,0, : } ; 
3 é 0 macro ADJ$B_LPD_INX = ¢-0-8.0 %; ! Path index : 
; 0938 O macro ADJ$B_LPD_SEQ = 3,0 z; ! Path sequence : 
: 0939 0 macro ADJ$W_PNA = 4,0 18.6 i: | Partner node address | 3 
; Bees 8 macro ADJ$W~BUFSIZ = 6,0,16,0 %; : gh ool s block size : 
; toh macro pat a IS se s 6,6 16,0 43 Lioenee interval (computed | fren neighbor's hello) : 
: macro a = 10,9, H ; stener timer (seconds le | 3 
; $908 : macro ADJ$B_BCPRI = sal bebe4 f; ! Broadcast priority | : 
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096 


tee MODULE XMC ### 


iiteral XMCSK_LENGTH = 
Literal XMCSC_LENGTH = 
sveeres nhncts a XMCDEF = 
macro XATBYTCNT = 
macro XNCSCACVBYTENT = 
macro XMC$W_XMTMSGCNT = 
macro XMCS$W_RCVMSGCNT = 
macro XMC$ 
macro XMCSW_ cc 
macro KACSULRCVDATBCC | 

C 


z 
o 
c 
Cc 
nn 
“ 
— 


—t 


macro XMCSW_XMTNOBUF = 
macro XMC$W_XMTHDRBC 
macro XMC$W_XMTDATBCC 
macro XMCSW_XMTREPS = 
macro XMC$W_RCVREPS = 


poe MODULE LTB *** 
LINK TABLE 


roror 
es 8 MNO @FOMwo 


a 
nmr 
ar 


- LTB 


local ‘end communications layer’ 
Link slots. 


1 
1 
' 
1 
! 
! 
Literal LTBSK_LENGTH = 20; 
Lit teral LTBSC- LENGTH = 20: 
‘ 
' 
' 
! 
1 
! 
i 
! 
' 


found in the —_ order word. 
is clear then t 


state information. 


This vector is terminated by a 
i ones followed b 

iiteral bres LTBDEF 
macro LTB$L_SCT_NXT = 0,0,32,0 % 


slot condidate to be tried the next tine 
e allocated 


' a link slot needs to 
neale LTBSW_ Slt. ro s * Fe 16.0 &:; 
macro LTB$W_SL 16,0 %; 
macro LTBsu-size = fg. 9 {; 
macro LTBSB_TYPE = ‘0 6 q: 
macro LTB$8_ SPARE = 1 4 8.0 &: 
macro LTBS$L-XWB = 12,0.32 § q; 
macro LTBS$L~SLOTS = 16.0,82,0 %; 


!eee MODULE ICB eee 


{ 
0 
6,0 


This structure is maintained by NSP (NETDRIVER). 
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DMC counter block = provides offsets for SHOW QI10 return of counters 


Length of counter block 
Length of counter block 


No. of bytes transmitted 
No. of bytes received 
No. of msgs transmitted 


No. of ‘header Sec error’  NAKS received 

No. of ‘‘data BCC error’’ NAKS received 
"ino buffer’’ NAKS xmitted 

No. of ‘‘header BCC error’’ NAKS xmitted 

No. of ‘‘data BCC error’’ NAKS xmitted 

No. of REPS xmitted 

No. of REPS received 


It contains all 


parameters and a vector of logical 


Structure size 
Structure size 


This is the first slot, not a pointer to pes 
Each slot in the vector is 4 bytes. 
low bit is set then the slot i available and 
its sequence number (number of times used) is 
If the low bit 
e slot contains a pointer to 
a structure containing the Link context and 


If the 


Longword of all 
br a /sepers of all zeroes. 


Pointer into the Link slot vector of the 


Total slots in vector 

Total useable slots in vector 

Size, in bytes, of oe tate structure 

Structure identif 

peneryed. woe abbey use 

XWB Listhead : 

The begining of the logical Link slot vector. 
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001 : 
§ ! INTERNAL CONNECT BLOCK = used to pass generic connect information 
: between the Network ACP and an End Communi- 
Ope } cations Layer (ECL) driver (e.g. NETDRIVER) 
B08 Literal ICBSC_LPRNAM = 0: ! Maximum Length of counted process name 
00 Literal ICBSC_RPRNAM = 20; ! Maximun Length of counted process name 
ons Literal ICBSC_ACCESS = 64; ! Maximum combined composite access string length 
Literal ICBSK_LENGTH = 163; ! $tructure size 
Literal ICBSC_LENGTH = 163; ' i 
Literal ICBSC_RID = 16; ! Max size of RID text field 
Literal ICBSS_ICBDEF = 163; 


macro ICBSW_PATH = 0,0,16 3 ! Path number (logical Line) over which connect 
' “was received or is to be transmitted. It 

! contains a sequence number in the high i bh 

! A value of zero ig Wm’ ig Papen specif ed. 


macro ICBSW_LOCLNK = 


| 
| 
Structure size 
Local Link address 


macro ICB$W¥_TIM_OCON = 4,0 16,0 °%; ! Qutbound connect timer, in seconds 

macro ICBSW_TIM_INACT = 6.6. 18.0 i; ' Maximum inactivity timer, in seconds 

macro ICBSW_SIZE = 8,0,16,0 2: ! Bytes allocated for structure 
macro ICBSB_TYPE = 16 §.8.0 i; ! Contains structure type code 

macro ICBS$W-RETRAN = 12.0.16,0 &; ! Maximum consecutive retransmissions before the 

' Link is Tore tbly disconnected 

macro ICBSW_DLY_FACT = 14,0,16,0 2%; ! Retransmission timer delay factor 

macro ICBSW_DLY_WGHT = 16,0,16,0 1%; !' Retransmission timer delay weight 

macro I1CBSW_SEGSIZ = 18 0:16,0 %; ! Maximum receive data segment size, in bytes, 

! excluding End Communications Layer protocol. 

macro ICBSB8_LPRNAM = $08.88 qt; ! Count of bytes used in next field 
macro ICBST_LPRNAM = 21,0,0,0 %; 

Literal ICBSS_LPRNAM = 19: ' Local process name 

macro ICB$8_RPRNAM = 40,0,8,0 2: ! Count of bytes used in next field 

macro ICB$T_RPRNAM = 41,0,0,0 2; 

Literal ICBSS_RPRNAM = 19: ! Remote process name 


Process names contain a type field in the 
first byte, and have the following formats: 


MIMINMITUIPOTITUN 
DUSAR WH ODO NONE WN OODNEN RU O 


CGDOCOOCOCOCOOCOOOOOCOOOCOCOOOSOS OOOO OOOOOCCOCOSGOOCCCOOCOOOOCOOOCOOCOOOOOOoOOo 
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39 <1> followed by an object type followed 
040 a counted (16 text bytes,max) object name 
041 <2> followed by an obje type followed by 
os6 y group code, 2 byte user code, an 
per a counted (12 text bytes,max) object name 
be macro ICBSB_DSTFMT = 41,0,8.,0 2%; ' format byte of remote process name 
04 macro ICBSB_DSTOBJ = 42,0,8,0 2%; ! Object type byte of remote process name 
04 macro ICBST_DSTDSC = 45,0,8,0 2%; ! Destination descriptor part of remote proc name 
04 macro I1CB$B_ACC = § 0.8.0 2; ! Count of bytes in following field 
04 macro ICB$T_ACCESS = 0,0 2; 


1 
Literal ICBSS_ACCESS = 63: ! Concatenated access control strings, with subfield 
ft) 


<0> followed by 1 byte non-zero spject type | 
y 
| 
| 
| 
maximum Lengths as follows (note that the sum | 


. /* ¢ 
USER,T,39 /* ‘User’ field of account to be connected to 
8 /* Count 9 bytes used in next field 
PSw,1,39 /« ‘Password’ field of that egcount 
n next field 


ee ee ee ee em ee ee md ed 8 kk eh a et 


COoCooooo°o 

Nev awalval ahah abel 

NOUS WO COON 
i De De i | 


acct.6 /* Count of bytes used 
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eee MODULE NETMSG *** 
& 
Define event codes used to pass blocks to the ACP 
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oF rs : F ACCT,1,39 /* “Account’’ field of that account 

 % macro ICBSB_DATA = 124.0.8.0 i; ! Count of bytes used in next field 

. i. macro ICBST DATA = 125,0,0,0 2; 

: 1061 Literal 1cBSs DATA = 16: ! Optional connect data 

? 2 macro ICBSW_REMNOD = 141,0,16,0 2; i Network address of partner 

= macro ICBSB_RID = 146.0.8.6 i; i Remote user (process, task, etc.) i.d. | 
a. macro ICBST_ RID = 147,0,0,0 2; 

i 1065 Literal ICBSS_RID = 16; 

; ©6106 ‘eee MODULE NETUPD *e* 

3 1208 + 

; 1 

; 1970 Function codes for XWB update routine (ACP communication routine) 

3 1078 - 

s 107 Code 

; 1076 0 iteral NETUPD$_ABORT = 1; ! Breaking Link 

s 1075 iteral NETUPDS_CONNECT = 2; ! Give NCB to task w/ declared name or object 
; 1976 iteral NETUPDS_EXIT = 3; ! Task is exiting 

3; 6307 iteral NETUPDS_PROCRE = 4; ! Starting a new process 

: 1078 iteral NETUPD$_DLL_ON = 5; ! Datalink starting for normal use 

; 1079 iteral NETUPDS_DLL DLE = 6; ! Datalink starting for service functions 
°F 0 iteral NETUPDS$_CRECNK = 7; ! Create a logical Link control block 
se 0 iteral NETUPDS$S_ABOLNK = 8; ! Abort all Links = network shutdown 

hea 8 iteral NETUPDS_DSCLNK = 9; ! Disconnect the specified Link 

re iteral NETUPD$_BROCST = 16; ! Broadcast mailbox message 

Se 0 iteral NETUPDS_REPLY = 11; ! Send mailbox mesgage to a specific mailbox 
2.9 0 iteral NETUPDS_RE Cv = 12; ! Reactivate datalink receiver 

‘7. 2 8 iteral NETUPDS$_SEND_RELLO = 13; ! Send hello message immediately 

hs iteral NETUPDS_ J = 14; ! Get output ADJ for a given node address 
3 ; 4 iteral NETUPDS$_TEST_ADJ = 15; ! Test if given node is adjacent to endnode 
; ; 0 

; : 

8 

; 1 

a iteral NETMSGSC_UNK = 1; ! Unknown message 

E~ * iteral NETMSGSC_ILL =_2; ! Illegal message 

3 1 iteral NETMSGSC_TR = 3; ! Transport control message 

ct 0 iteral NETMSGSC_IRP = 4; i IRP from datalink which is shutting down 
: 1100 iteral NETMSGSC_APL = 5; ! Aged packet 

3 10) iteral NETMSGSC_NUL = $: ! Node unreachable packet 

ee § iteral NETASGSC_NOL = 7; ! Node out of range packet 

s 10 iteral NETMSGSC_PFE = 8: ! Packet format error 

;  =61104 iteral NETMSGSC_LSN = 9; ! Listner timer expired 

; 1105 iteral NETMSGSC_OPL = 10; ! Oversized packet loss 

3 1108 iteral NETMSGSC_CRD = 11; ! Circuit run down 

: ©6110 iteral NETMSGSC_ADJ = 12; ! Adjacency up 
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' SHCA KE RAHA HEAAAAHAAAAAETAAAAAAAARERAAEEAETAE TEAR EKER AAEAAAAEAREAAAAAETAEEAAAAAAAHAAATAAAAAAERAERAEAAEAEEEAAEAEe 


! Created 15-SEP-1984 22:48:56 by VAX=-11 SDL v2.0 Source: 15-SEP-1984 22:47:52 _$255$DUA28: (NETACP.SRCINETU 


' PERERA RATE AAAAAAAAAAAAAAA AEA AHR AHHH TEA EA AAA AAAAAA AERATOR AAAAAAAATAAAAARERAAAHERETARERETeReTeReTeeet 


| 


teee MODULE NFB tee 
The following generic field identifiers are defined for all databases. 


iteral NFBSC_ENDOFLIST = 0; ! Used to terminate the field i.d. 
iteral NFBSC_WILDCARD = 1; ! Field i.d. used for ‘match all" database searches 
iteral NFBSC_CTX_SIZE = 64; ! Length of context area in P2 buffer 


The following codes are passed in the second I0SB longword to qualify 
as SSS_ILLCNTRFUNC error. 


The high order word of these error codes must be 0 
so tha ghey won't be confused with field i.d.s 
teral NFBS_ERR_FCT = 1; ! Unrecognized NFBSB_FCT value. 
§ Unrecognized NFBSB_DATABASE value. 
The Pl buffer is invalid. 
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The PS buffer should not have been specified. 
The P6 buffer should not have been specified. 
Unrecognized NFBSB_CELL value. 


Unrecognized NFB$B_OPE l 
| 
| 
| 


Hn nh ONOUSs 


R value. 
Unrecognized NFBSL_SRCH_KEY field ID 
Unrecognized NFBSL_SRCH¢2_KEY field ID 


teral NFBS_ERR_OPER2 = Unrecognized NFB$B_OP value. 

teral NFBS_ERR_FLAGS = 14; ! Undefined bits in AFBSB_FLAGS were not zero. 
Define the Pl buffer format 

iteral NFBSC_DECLNAME = 21; ! Declare name 

iteral NFB CLOB : ' Declare object 

iteral NFB 5; ! Declare server process available 


$C_DECLOB) = 

$¢ PECL sany = 
tT 
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4 
4 
4 
4 
4 
d 
4 (Leave room for 4 obsolete function codes) 
4 iteral NFBSC_LOGEVENT = 28: ! Log a network event 
G iteral NFBSC_READEVENT = §; ! Read current raw event queue (used by EVL only) 
5 Resume defining nynce ton codes 
H (leave room for goeoiete function codes) 
iteral NFBSC_FC_DELETE = 55; ! Remove an entry from the data base. 
5 iteral NFBSC_FC_SHOW = gf ! Return speci tied field values. 
: iteral NFBSC_FC_SET = 35; ! Set/modify the field values. 
iteral NFBSC-FC"CLEAR = 363 i Clear specified field values. 
23 iteral NFBSC_FC-ZERCOU = 37; ! Jero (and opt tonal ty read) counters 
iteral NFBSC Poaeer = 38; ! Loop (used only to PSI to loop an X.25 Line) 
28 ximum FCT value 
9 iteral NFBSC_FC_MAX = 38; ! Maximum FCT value 
60 iteral NFBSM_ERRUPD = 1; 
61 iteral pod 5 al a = 2; 
6¢ iteral NFBSM_NOCTX = 4; 
6 iteral NFB$C"DB_LNI = 1; ' Local node 
64 iteral NFBSC_DB_NDI = 2; ! Common nodes 
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era DB. = 3; : twork objects 
iteral NFBSC_DB_OBI = 3 ! oN : b 
Hirat MERESBECRE = § | flee 
era = 5; : 
iteral NEBSC~DB-EF I = $: ; Event Logging fitters 
iteral NFBSC_DB_ESI = 7; ! Event bogging sinks 
iteral NFBSC_DB_LLI = 8: ' Logica 
iteral NFBSC_DB_XNI = 9; ' X%.25 networks 
iteral NFBSC_DB_xXGI = 16; ; Be groups 
iteral NFBSC_DB_XD] = 31; ; ge TEs 
iteral NFBSC_DB_XS5 = 1¢: : g. server 
iteral NFBSC_DB_XD5 = 15; ; §. cook nations 
iteral ad + 9 HY = 14; ; Be over 
iteral NFBSC_DB_xXD9 = 15; . Be dest nations 
iteral NFBSC_DB_XTI = 19; ' X%.25 trace facility 
ET APRESS IE Dee Reeee 
era _bB_ = 18; ! Server Process 
iteral NFBSC_DB_AJI = 15: : adjacency information 
iteral NFBSC_DB_ARI = 20; ! Area information 


(The following codes are reserved for future PSACP 
databases. hese codes should only be used in the 
event PSIACP needs a database code before a new 
new NETACP can be su Maes to Support it). 


iteral NFBSC_DB_PSI1 PSI reserved database 

iteral NFB$C_DB_PSI2 = ¢: i PSI reserved database 

iteral NFBSC_DB_PSI5 = 25; ! PSI reserved database 

iteral NFBSC_DB_PSI4 = 24; : 44 reserved gorepese 

iteral NFBSC_DB_PSIS = 25; : i reserved databas 

iteral NFBSC_DB_SDI = $: : gery ce (DLE) information 

iteral NFBSC_DB_XAI = 27; : access databas 

iteral NFBSC_DB_XxXxX = 28; ! Last database definition for NFBSC_DB_MAX calc. 
Maximum DATABASE value 

iteral NFBSC_DB_MAX = gf ! Maximum DATABASE value 

iteral NFBSC_OP_EQL = 0; ! Match if SEARCH KEY value EQL database entry field 

iteral NFBS$C_OP-GTRU = 1; i Match if SEARCH-KEY value GTRU database entry field 

iteral NFBSC_OP_LSSU = 2; ' Match if SEARCH_KEY value LSSU database entry field 

iteral NFBSC_OP_NEQ = 3; : y" i aggAncn. KEY value NEQ database entry field 
The followin pay onty be used internally by 

iteral NFBSC_OP_FNDMIN = 4; ! Find probe with minimum key value 

iteral NFBSC_OP_FNDMAX = 5; ! Find entry with maximum key value 

iteral NFBSC_OP-FNDPOS = 6; ! Find entry position in database 
Max imum operator funct ign 

iteral NFBSC_OP_MAXFCY = 3; ! Maximum operator function 

iteral NFBSC_OP MAXINT = 6; ! Maximum internal function 

iteral NFBSK_LENGTH = 16; ; Minimum structure size. 

iteral NFBSC_LENGTH = 1 Minimum etre sure size. 


counted strings. If the “cell size" is non-zero 
r of bytes wh which each string n" 
> Gutver occupies. it is zero then strings 
fi sids are Stored as ariable lengthed strings. 
iiteral wees? ty fy se. 
macro NF 
' “Function ok eo° ake ie 
: (leaving rece for 0 obsolete function codes} 
macro NFBS$B_FLAGS 8,0 %; ; ptgces Lanceus control flags 
macro NFBSV-ERRUPD = "° 1,0 & Update position context, even on error 
macro NFBSV_MULT = 1,1 0° .. ! Process as many entries as can be fit into P4 
macro NFBSV~NOCTX = 1,2,1,0 &:; i Don't update position context, even if successful 
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! A function code as follows: 
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: _— to s Fagsethe” Rrued tf ies . while). This 
: verride @ 
@88 A © 5PoY ! A code identifying the database as follows: 
ERO i iattotd nites Ls Gi e "for we tield 
me. NF Specifies the sense of the search (e.g. EQL, GEQU) 
! when compar ing agai nst the ie tee KEY tietde 
macro NFBSL_SRCH_KE Search key. field identifier specifying the key used 
to hoy the” entry in the database. This search is 
controlled by the sense of the NFBSB_OPER field. 


If this field has the value "'NFBSC_WILDCARD’', then 
the very next entry in the List is assumed to be the 
target of the search. 


If this field is not specified (zero), then it 
is assumed to be NFBSC_WILDCARD (no search key). 


' 
i 
i 
i 
i 
i 
i 
i 
i 
i 
macro NFBSL _SRCH2_KEY = 8,0,32,0 ! yecondery search key field ID specifying the key used 
' “to locate the entry in the th. tabi This search is 

controlled by the sense of the NFBSB_OPER2 field. 

i 

i 

i 

i 

i 

i 

i 


If both SRCH_KEY and SRCH2_KEY are specified, then 
only those database entrieS matching both search keys 
will be processed. 


If this field is not specified (zero), then it 
is assumed to be NFBSC_WILDCARD (no search key). 


macro NFBSB _OPER2 = 12,0,8,0 ! Specifies the sense of the search (e.g. EQL, GEQU) 
! when gomper ing =°98'5 inst the TEacHe _KEY field. 

macro NFBSB_ ! Reserved. MBZ. 

macro NFBSW_ CELL SIZE" te 0 is. 0%; | Some of the field values found in the P4 buffer are 
macro NFBSL_FLDIB = 16,0, ! Cell containing the first field ID -- the List 

of field” Ds begins here and. ‘continues to the 

end of the structure. 


Define useful Syaqete for storing and retreiving binary and string 


values from the P2 and P4 buffers 


' 

! The List may be terminated before the end of t 

! structure by plac cing the value NFBS$C ENDOFLIST © 

: in the Longvord following the Last fTeld ID. 

' 

: Define the ‘field i.d.*’ format. 

Literal NFBSM_INX = 65535; 

Literal NFBSM_TYP = 196608: 

Literal NFBSM~SPARE = 16515072; 

Literal NFBSM_DB = -16777216; 

Literal NFBSC_TYP_BIT = 0; ! Field type for bits 
literal NFBSC_TYP_V = 0; ! Field type for bits 
Literal NFBSC_TYP_LNG = 1; ! Field type for longwords 
Literal NFBSC_TYP_L = 1; ! Field type for longwords 
Literal NFBSC_TYP_STR = 2; ! Field type for strings 
Literal NFBSC_TYP_S = 2; ! Field type for strings 

1 

i 
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Literal weess NFBDEF1 = 


mac 
Tester Oras SPAR ! Reserved, MBZ 


macro NFBS$L_PARAM -}°9° 19-b-2 2,0 %; ! Define parameter ID longword ; 
macro NBS vs ‘eh : 9-0, ° 
eral N é ! Index into semantic table : 
macro NFGS seb - 0, 2,0 %; ‘ 
l oral “A is Y ! Field type (string, bit, etc.) ; 
SPARE . +18,6,0 %; ‘ 


macro NFBSV_DB = 0 fio %; 
Literal N Fass DB = ' Data-base i.d. 
Literal NEBSS “NFBDEF? = 


macro NFBSL_LAG = 0:0, 32.0 %; ! Longword value 

Literal NFBSS_NFBDEFS = 

macro NFBSL_BIT — = 49 32 : %; ' Boolean value 

Literal NFBSC_NDI_LCK = 544 ! Set if conditional Ly, writable fields are not writable 
Literal NFBSC_NDI_LOO = ek ' Set if CNF is for a ‘‘loopback'’ node 

Literal NFBSC_NDI_REA = 33554435 ! Set if node is reachable 


“Longword’’ Parameters 
iteral NFBSC_NDI_TAD = 33619984 ! on gra toracd address'’ ~ uses local node address 


ts 

‘* 3 

3; 3 

‘ % 
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3; 6 

7 

. ¥ 

Ts 

‘3 

. ¥ 

cos 

; 1 

ty 

ee 
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: os 
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;.6C« 0 : 

oe 

... ¥ 0 ! for the local NDI (in eed, of zero as does A 

Ts 0 Literal NEBSC_NDI_CTA = ! Absolute due time for logging counters 
3; «Y 0 Literal NFBSC_NDI_ADD = 336199 6; ! Address 

3 0 Literal NFBS -NO1 ctl = 33619987; ! Counter timer 

3 .6C« 0 Literal NFBSC_NDI_LACL = 35619988; ! Active Links 
as 8 Literal NFBSC_NDI_DEL = 33619989; ! Dela ay 

3; J Literal NFBSC_NDI_DTY = 33619990; ! Destination Type 
:..¥ 0 Literal NFBSC_NDI_DCO = 33619991; ! Destination Cost 
; 1308 O Literal NFBSC_NDI_DHO = 35619992; ! Destination Hops 
54% Literal NFBSC_NDI_SDV = 33619995; ! Service Device 

; 1310 Literal NFBSC_NDI_CPU = 33619994; ! CPU type 

3s 931) Literal NFBSC_NDI_LSTY = 33619995; ! Software type 
hs \¢ Literal NFBSC_NDI_DAD = 013398: ! Dump address 

5 Ta Literal NFBSC_NDI_DCT = 33619997; ! Dump count 

i 1315 0 Uiteral NEBSCCNDIZIHO = $3619999; =i Host 

3 era = 3 ! Hos 

2 1 6 Literal WEBSC_NDI_ACC = 33620000; ! Access switch (inbound, outbound, etc) 
. Literal NFBSC_NDI_PRX = 336 O33 ! #* obsolete ** (Node proxy parameter) 
; 1318 Literal NFBSC_NDI_NND = 336 ; $3 ! Next node address 
3 ! i Literal NFBSC_NDI-SNV = 336200035; ! Service Node Version 
3 : $1 0 String parameters 

> 9 g 0 Literal NFBSC_NDI_COL = 336 3268: ! Collating field 

> ©1326 Literal NFBSC_NDI-HAC = 336 § 3 ! Node address/loop Linename combination 
3; %5e9 Literal NFBSC_NDI_CNT = 336 9 ! Counters 

, 6 CY $ Literal NFBSC_NDI_LNNA = 33685571; ' Name 

ma Literal NFBSC_NDI_SLI = 336 ug: ! Service Line 
me 3 Literal NFBSC_NDI_SPA = 4 73; ! Service password 
; 7 Literal NFBSC_NDI_LOA = 74; ' Load file 

o* % Literal NFBSC_NDI_SLO = 33685575; ! Secondary loader 
306 (CVSS) literal pod + 4d S ? 16: ! Tertiary loader 

. % ; Literal NFBSC_NDI_SID = 77; ! Software ID 

ets Literal NFBSC_NDI_DUM = ? 8: ! Dump file 

i Literal NFBSC_NDI_SDU = 79; ‘ ae quaper 
5 toes Literal NFBSC_NDI-NLI = 35685580; ! Loopback L 


DAMMAM Seas 
DONAVULSWN —OOONOULS WIN —OOO 


mk a et a at ad tt st a nt 4) a 4 a La — — 4 — 2) bs — 9 bs bd as 2 2 2 a ls 


SGOOSSGOGOOCOOCOOOSOOOOC COSCO OOSOOSOSSOSOSSOSOOCSCOSOOOOOCOCOOOOOOOOOOOOoOO 


Be Se Se Se Se Ge Ge Se Se Ge Ge Se Ge Se Se Se Ge Ge Se Ge Se Ge Ge Se Fe Ge Ge Ge Ge Ge Ge Se Fe Ge Fe ee ese FH SESH SH Se SH Se Se Se Se Se Se Sete Se Se Se Se tease 


iteral NFBS 
jiteral NFBS 
iteral NFBS 
iteral NFBS 
iteral NFBS$ 
iteral NFBS$ 
iteral NFBS$ 
iteral NFBS 
iteral NFBSC_ND 
iteral NFBSC_ND 
iteral a 245 

iteral NFBSC_NDI_LPA 
iteral NFBSC_NDI"“NNN 
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Boolean parameters 


teral NFBSC_LNI_LCK = 16777217; 
teral NFBSCLNI_-SUP = 1677721 


“‘Longword parameters 


teral NFBSC_LNI_ADD 
teral NFBSC_LNI-ACL 
teral NFBSC_LNI_ITI 
teral NFBSC_LNI_OTI 
teral NFBSC_.NI STA 
teral NFBSC_LNI_MLK 
teral NFBSC_LNI_DFA 
teral NFBSC_LNI DWE 
teral NFBSC_LNI_IAT 
teral were LNI_RFA 
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teral NFBSC_LNI_MBR 


1$-0 Sep-1984 23:07: VAX-11 Bliss-32 V4.0-7 G 
1ar8ep-188e $3:ka:58 — “S2sdSnUA2B CRE TACP OBJSNETUSR.R32;1 °%° C4 
Destination Line 

Privileged user id 

privipeges account 

Priv privit password 

Non-privileged user id 

Non-privileged account 

Non-privileged password 

Receive password 

Transmit pepoverd 

Diagnostic load file 

Hardware NI address sonal address) 

Loop assistant NI addres 

Next node name to dest ination (goes with NND) 


Define a field identifier index for each parameter in the LNI database. 


Set if conditionally writable fields are not writable 
Set if area numbers are to be suppressed 


Address 
Total number of active Links 
Incoming timer 
Outgoing timer 
State 
Maximum Links 
Delay factor 
pel ay weight 
Inac ivits timer 
Retransmit factor 
Executor Type 
Routing timer 
Routing suppression timer 
Subaddress 
upper Limit) 
Maximum address 
lines 


uf fer 
Forwardin a size 
Loop coun 
Loop length 
Loop Data type 
Default access switch (inbound, outbound, etc) 
peraust gan A access (inbound, “outbound, *etc) 
r et quote 
~ type of age tetence given to loop requestors 
bees Be routing timer 
Maximum areas 
Maximum nonrouters on NI 
Maximum routers on NI 


15-$ep-198 33:00:98} “ShsbspGAdsscucrace omJSNETUSR.R32:1°°%* «as 


iteral NFBSC_LNI_AMC = 16842800; ! Area maximum cost 

iter 7. ae rest t _AMH = 1 13 ! Area maximum hop 

iter BSC_LNI_SBS = 1684 ¢: ! Segment buffer s 

iter ral NEBSC“LNI TALI = 1684 : ! Alias local node address (cluster address) 


String parameters 
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era g = $ ! Collatin e 
iteral NFBSC_LNI_COL = 169 ! Collating field 
iteral NFBSC_LNI_ = 169 3 ' Local - e name 
iteral NFBSC_LNI_CNT = 169 4; : Founters 
iteral NFBSC_LNI_IDE = 169 5; ! Identification 
iteral NFBSC_LNI_MVE = 169 $: ! Management version 
iReral NEBSC-LNIZRVE = 16908358: | Routing version 
r = 3 ! Routing ver 
iteral NFBSC_LNI_PHA = 1690 35 ! Physical NI address (current address) 


Define a field identifier index for each parameter in the OBI database. 


Boolean Parameters 


Literal NFBSC _OBI_LCK = 20331062: ' Set if set ato writable fiel 
iteral NFBSC"OBI-SET = 50331656; ' Set if a ‘'set’’ Q10 has ever modifi 
not then the CRF was due to a ‘‘declare name/obect"’ 
only and may be deleted when the declaring process 
breaks the channel over which the object was declared 


are not writable 


ds 
ed the CNF. If 


Longword Parameters 
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I 
teral NFB$C_OBI_PRX 
String Parameters 


Low order privileges 

High order privileges 

Owner's UCB address 

Owner's channel 

Number 

Process id 

Proxy login switch (inbound, outbound, etc) 


ee ee ee a a ee ee ee ee a ee a ee a a a 
SGOOSOSOSSOOCOOOCOCOOCOOSOSOOCOOOSOSOOSOOSOOSOSOSSOCSOSOOOOOCOOOOOOOOOOOOOOOOOO 


Se Se Be Se Se Se Se Be Se Se Se Se Se Ge Se Se Ge Fe Se Fe Se Ge Ge Se Ge Ge Ge Fe Se Se Se Ge Ge Se Ge FH Se Se Se Se SF Sse Se Se Ge Se Se Se Se Fe Se Seas Se Se tees 


iteral we ese 081 COL = 50462784; : col letiog field 
iteral NFBSC_OBI_ZNA = 50462785; ' Jero o bj ina pene identifier 
iteral NFBSC_OBI_SFI = 504627 $ ! Parsed 
iteral NFBSC_OBI_IAC = 50462787; ; potaute Re combined access control string 
4 iteral NFBSC_OBI_NAM = rh 7 8: } 
43; iteral NFBSC_OBI-FID = 50462789; : ite id 
4 iteral NFBSC_OBI_USR = 50462790; ' User id 
439 iteral NFBSC_OBI_ACC = 50462791; ! Account 
rr iteral NFBSC“OBI-PSW = 50462792; ! Password 
rr Define a field identifier index for each parameter in the CRI database. 
444 
445 /* Use 
rr | /t oe 
&& C = common 
ree E = “Executor (used by Transport) 
44 X = Native X.25 network management 
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Boolean Parameters 


Se “19 ¢ 3 07: VAX-11 Bliss-32 V4.0-7 e 29 NE 
1228671384 3:08:98 _8255$ $00 ADB: [WETACP. 084 NETUSR.R32;1 ts (1) Ta 
0 iteral NFBSC_CRI_COL = 6724 3 ! D Coliating field 
0 iteral NFBSC_CRI_NAM = $7849 NE ; € tte ait Rone 
0 iteral NFBSC_CRI_VMSNAM = 6 49602; ; » Dev ce name in VMS format 
1 iteral NFBSC“CRI-CHR = $7 4 3 : = characteristics buffer for startup control QI10 
1 iteral N Wr BSE WCRI CNT = 67240004; : € Counte 
1 iteral N WEBSC ERY Pee = 67240005; ! D Line's "Phasell partner name (for Loopback) 
1 iteral NFBS$C_CRI_LOO = of 40 8: ! E— Loopback name 
1 iteral NFBSC_CRI-PNN = 67240007; . & 
1 iteral NFB _CRI_NUM = 67240008; ! xX Call Number 
1 iteral NFBSC_CRI-DTE = 67 yet ' xo 
} iteral NFBSC “CRI-DEVNAM = 67240010; ! D Device name in VMS format, with unit included 
} Define a field identifier index for each parameter in the PLI database. 
C#e 
$ L = (APB. Cx -25) 
2 D = DDCMP (not X.25) 
$ E = Ethernet 
2 /* Use 
2 
2 
: 
3 iteral NFBSC CPU Loe 83886081; ! D Set if conditionally writable fields are 

not writable 
3 iteral NFBSC_PLI_SER = 83886082; ! D Service 
3 iteral NFBSC_PLI_DUP = 83886083; ! C Duplex (set if half) 
3 iteral NFBSC_PLI_CON = 83886084; ! C¢€ Controller (set if loopback) 
: iteral NFBSC_PLI_CLO = 83886085; ! € Clock mode (set if internal) 
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: “Longword’’ Parameters 
: iseret wrBsc ptt 4 = 83921036: p ppeskune time for counter read and clear 

era ~PLI_STA = ; ' ate 
4 iteral NFBSC_PLI_SUB = 83951634; ' C¢ Substate 
4 iteral NFBSC_PLI_LCT = 83951635; ' PD Counter timer 
4 iteral NFBSC_PLI_PRO = Se901 089: ! C¢ Protocol 
4 iteral NFBSC_PLI_STI = 83951637; ! D Service timer 
4 iteral NFBSC_PLI_HTI = Seo2) cee: ! L Holdback timer 
4 iteral NFBSC_PLI_MBL = H 951639; ' L Maximum block 
4 iteral NFBSC_PLI_MRT = 83951640; ! L Maximum retransmits 
4 iteral NFBSC_PLI_MWI = 83951641; ' Lb Maximum window 
5 iteral NFBSC_PLI_SLT = 921966: ! D Scheduling timer 
5 iteral NFBSC_PLI_DDT = 85951645; ! 0 Dead timer 
5 iteral NFBSC_PLI_DLT = 83951644; ! D Delay timer 
5 iteral NFBSC_PLI_SRT = 83951645; ! 9D Stream timer 
5 iteral NFBSC_PLI_BFN = 921908: ! D Receive buffers 
2 itera} eetropt t-plcce Beet rie petien # routine returns bufsiz used for Line 

era = 3 ; 
5 iteral NFBSC_PLI“RTT = $81049: i D Retransmit time 
5 iteral NFBSC_PLI_MOD = 83951650; ' Lt X.25 mode (D DCE. DTE. etc). 
5 iteral NFBSC_PLI_LPC = 83951651; ! L Loop count 
6 iteral NFBSC_PLI_LPL = 321636: ' L Loop length | 
6 iteral NFBSC_PLI_LPD = 83951655; ' L Loop Data type 
6 iteral NFBSC_PLI_EPT = 83951654; ' € Ethernet protocol type for datalink 
6 iteral NFBSC_PLI_BFS = 83951655; ; « 


Line buffer size (overrides executor bufsiz) 


1-19 33:28:58 — YS¥sSSoUAaBscnerach.cBsSneTusR.R32;1°°%° (1) 


: «©1564 ' 

3 : 2? String Parameters 

an 5 literal NFBSC ful -fOL = rh ht 19 ! D Collating field 

+ «©1568 Literal NFBSC_PLI~ 401721 ' C¢ Line name 

>; ©1569 8 Literal FBSC7PLI~V VMS SNAM = es 17218; ! D Device name in VMS format 

3; Tor Literal NFBSC_PLI_CH ' 7219; ! D Set-mode $Q10 Line Characteristics buffer 
; in ®@ Literal WEBSC_PLI CNT = 84017220; ! C Counters 

: 1276 0 Literal NFBS$ Pll ae = 84017 a ' L Filespec for microcode dump Stats totes dump) 
: 157 8 Literal NEBSC7P LI-H 017 ' OD NI hardware address (ROM address 

3 Vere Literal NFBSC_ “PLIT ~DEVNAM = 8401 S03, ! D Device name in VMS format, with att included 
: 1376 0 Define a field identifier index for each parameter in the EFI database. 

: 1578 0 i 

; 120 8 ; Boolean Parameters 

: 133) 4 literal NFBSC_EFI_LCK = 100663297; ! Set if conditionally writable fields are not writable 
; 1388 8 “Longword’’ Parameters 

: 1585 0 literal NFBSC_EFI_SIN = 100728848, 

:; 1586 0 Literal NFBSC_EFI-SP1 = 100728849; 

: 1587 0 Literal NFBSC_EFI-B1 = 100728850; 

: 1388 ° Literal NFBSC_EFI~B2 = 100728851; 

; iF 4 String Parameters 

: 1336 0 iiteral NFBSC -EFI_COL = 100 teas: ! Collating field 

>; 1593 0 Literal NFBSC_EFI-EVE = 1007944 

; 1894 0 Literal NFBSC_EFI~SB1 = 100794434: 

; 1595 0 Literal NFBSC_EFI-SB2 = 100794435; 

: 1298 8 Literal NFBSC_EFI-SB3 = 100794436: 

: 128 3 ! Define a field identifier index for each parameter in the ESI database. 

: 1600 0 i 

: 1a 8 Boolean Parameters 

: 1608 literal NFBSC_ESI_LCK = 117440513; ! Set if conditionally writable fields are not writable 
: 1605 9 “‘Longword’’ Parameters 

: 1607 0 literal NFBSC_ESI_SNK = 117506064; 

: 1608 O Literal NFBSC_ESI-STA = 117506065; 

: 1609 8 Literal NFBSC_ESI-SP1 = 197208086; 

: 1610 Literal NFBSC_ESI“B1 = ene 67; 

: 1) 8 Literal NFBSC_ESI-B2 = 117506068; 

: 1618 0 String Parameters 

; 1615 § literal wr ese £31 COL = 117571648; ! Collating field 

: 1616 0 Literal NFBSC_ESI_LNA = 117571649; 

: 161 Literal NFBSC_ESI"SB1 = 117 £1830: 

3 1918 Literal NFBSC~ ~£ 31-386 = 117571651; 

: 1e7 y {teret NFBSC"ESI“SB5 = 117571652; 
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Define a field identifier index 


Boolean Parameters 
iteral NFBSC_LLI_LCK = 134217729; 
Longword Parameters 


BSC_ 
teral NFBSC_L 


L 
teral NFBSC_LLI_ 
String Parameters 
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for each parameter in the LLI database. 


Set if conditionally writable fields are not writable 


Round trip delay time 
State 


Local Link number 
Remote Link number 
Partner's node address 
External Process 1.D. 
Internal Process 1.D. 
Pointer to XwWwB 
Counters 


Collating field 
User name 

Process name 
Partner's node name 


CNETACP.OBJ JNETUSR.R32;1 
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3 ! Partner's process i.d. 
X.25 network parameters (part of MODULE X25-PROTOCOL) 
Define a field identifier index for each parameter in the XNI database. 


Boolean Parameters 


iteral NFBSC_XNI_LCK = 150994945; ! Set if conditionaily writable fields are not writable 
iteral NFBSC_XNI_MNS = 150994946; ! \X.25 multi-network support (set if enabled) 


“Longword’’ Parameters 
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iteral NFBSC_XNI_CAT = 131060696; ! Call timer 
iteral NFBSC_XNI_CLT = 151060497; ' Clear timer 
iteral NF3SC_XNI_DBL = 121980698: ! Default data 
iteral NFBSC_XNI_DWI = 151060499; ! Default window 
664 iteral NFBSC_XNI_MBL = 151 ° : 9 ! Maximum data | 
665 iteral NFBSC_XNI_MCL = 151 3 ! Maximum clears 
066 iteral NFBSC_XNI_MRS = 1510605 ¢! ! Maximum resets 
66 iteral NFBSC_XNI_MST = 151060505; ! Maximum restarts | 
668 iteral NFBSC_XNI_MWI = 151060504; ! Maximum window | 
669 iteral NFBSC_XNI_RST = 13) 60505; ! Reset timer 
oy iteral NFBSC_XNI_STT = 151060506; ! Restart timer 
or String Parameters 
674 iteral NFBSC_XNI_COL = 131) 6080: ' Collating field 
ef iteral NFBSC_XNI_NET = 151126081; ! Network 
67 


X.25 DIE parameters (qualified by a given network) | 
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Boolean Parameters 
iteral NFBSC_XGI_LCK = 167772161; ! Set if conditionally writable fields are not writable | 
“‘Longword’’ Parameters 


teral NFBSC_XGI_GNM 
teral NFBSC_XGI_GTY 


String Parameters 
iteral wFBSC_XG1_COL = 167903296; ! Collating field. This field must be unique across 
all entries in this database. It consists of the 
21878533872" DIE address. 


! Group number | 
! Group type 
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67 | 
i) } Define a field identifier index for each parameter in the XDI database. 
681 i | 
oes } Boolean Parameters | 
one literal NFBSC_XDI_LCK = 184549377; ! Set if conditionally writable fields are not writable 
rey ! “Longword'’ Parameters | 
688 Literal NFBSC_XDI_ACH = 184614928; ! Active channels | 
689 Literal NFBSC_XDI_ASW = 184614929; ! Active switched 
690 Literal NFBSC_XDI_CTM = 184614930; ! Counter timer 
691 Literal NFBSC_XDI_MCH = 184614931; ! Maximum channels 
o3¢ Literal NFBSC_XDI_LSTA = 1846149 ¢3 ! State | 
69 Literal NFBSC_XDI_SUB = 184614933; ! Substate 
eRe Literal NFBSC_XDI_MCI = 184614934; ! Maximum circuits CVMS only] 
4] String Parameters 
98 literal NFBSC_XDI_COL = 197080316: ! Collating field 
Literal NFBSC_XDI_DTE = ret ttt 3 ! OTE address 
00 Literal NFBSC_XDI_CHN = 184680514; ! Channels 
01 Literal NFBSC_XDI_LIN = 184680515; ' Line 
4 Literal NFBSC_XDI_NET = 184680516; ! Network 
3 Literal NFBSC_XDI_CNT = 184680517; ! Counters 
05 ! X.25 group parameters (qualified by a given DTE) 
4 Define a field identifier index for each parameter in the XGI database. 
l 
' 
i 
: 
L 
l 
' 
i 
i 
l 
: 
! 


group-name string f 
teral NFBSC_XGI_GRP = 167 3 ! Group name 
teral NFBSC_XGI_GDT = 167905298; ! Group DTE address | 


X.25 server parameters (global parameters for all destinations) 
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Define a field identifier index for each parameter in the XS5 database. 


Boolean Parameters 
literal NFBSC_XS5S_LCK = 201326593; ' Set if conditionally writable fields are not writable 
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“Longword’’ Parameters 


: 17 ‘ 

oo 

: 1738 literal NFBSC_XSS_MCI = 201 3 144; ! Maximum circuits allowed 

; 1739 Literal NFBSC_XSS"STA = 201392145; ‘ tate 

; 1740 8 Literal NFBSC_XS “ACl = 0139 95108: ! Active circuits 

: 108) 8 p teret NFBSC_XS5_CTM = 201392147; ! Counter timer 

: 1748 8 String Parameters 

> 1745 0 Literal NFBSC_xS5 am = 201457728; ! Collating field. This field must be unique across 
: 1768 0 ' all entries int S_dgrabass 

; War 0 literal NFBSC_XS5_ ent = 201457729; ' Counters 

: He 0 X.25 destination parameters (part of MODULE X25-SERVER) 

: Hed 8 Define a field identifier index for each parameter in the XD5 database. 

: 1788 0 i 

: 1738 8 Boolean Parameters 

: \r38 ° literal NFBSC_XD5_LCK = 218103809; ! Set if conditionally writable fields are not writable 
; 1738 8 ; “‘Longword’’ Parameters 

: 1760 0 literal NFBSC_XD5 PRI = 18169360; ! Priority 

s 1761 @ Literal NFBSC_xXD5S— -~ 181693 Subaddress range 

3 1766 0 ' (lower word = Limit upper word = upper Limit) 

: Ver 8 prneres NFBSC_XD5 “NOD = 218169 Remote node address containing server (gateways only) 
; 1702 8 String Parameters 

> 1767 0 Literal NFBSC_XDS_COL = 218234944; ! Collating field. This field must be unique across 
: 1768 0 ' all entries in this databas 

; 1769 0 Literal NFBSC_XDS_DST = 218234945; ! Destination DTE address 

; Wwe ® Literal NFBSC_XD5_CMK = 218234946; ! Call mask 

s Wri 8 Literal NFBSC_XD5_CVL = 218234947; ' Call value 

3 1778 Literal NFBSC_XD5_GRP = 21 re vt f ! Group name 

- Wee © Literal NFBSC_XD5_NUM = 218234949; !' DTE number 

: 17746 0 Literal NFBSC_XD5_OBJ = 218234950; ! 8&8 Object name 

s We se Literal NFBSC_XDS_FIL = 218234951; ! Command procedure to execute when starting object 
3 17re 0 Literal a4 oy _USR = 21 1326: ! User name 

3 177 Literal NFBS$ _PSW = 218234955; ! Password 

3 1778 Literal NFBSC” “MDS_ACC = 218234954; ' Account 

; 1709 X.29 server parameters (global parameters for all destinations) 

; 1783 Define a field identifier index for each parameter in the XS9 database. 

: 1784 i 

3 Vy 5 Boolean Parameters 

: 1787 literal NFBSC_XS9_LCK = 234881025; ! Set if conditionally writable fields are not writable 
: 1788 8 “‘Longword’’ Parameters 

: «1791 7 literal NFBSC_XS9_MCI = 234946576; ! Maximum circuits allowed 
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VAX-11 Bliss-32 v4.0-74 
"$255SDUA28: 


CNETACP.OBJ JNETUSR.R32;1 


Literal NFBSC_XS9_STA = 234946577; . stare 

Literal NFBSC_XS9_ACI = 25494 8: ! Active circuits 

Literal NFBSC_XS9_CTM = 234946579; ! Counter timer 

String Parameters 

Literal NFBSC_XS9_COL = 235012160; ! Collating field. This field must be unique across 
! all entries in this database: 

Literal NFBSC_XS9_CNT = 12161; ! Counters 

; X.29 destination parameters (part of MODULE X29-SERVER) 

; Define a field identifier index for each parameter in the XD9 database. 

} 

! Boolean Parameters 

literal NFBSC_XD9_LCK = 251658241; ! Set if conditionally writable fields are not writable 
i — "“Longword"’ Parameters 

Literal NFBSC_XD9_PRI = 5172379 ; ! Priority 

Literal NFBSC_XD9_SAD = 251723793; ! $ubaddress range 

! (lower word = Tower Limit upper word = upper Limit) 

Literal NFBSC_XD9_NOD = 251723794; ! Remote node address containing server (gateways only) 
String Parameters 

literal NFBSC_XD9_COL = 251789376; ! Collating field. This field must be unique across 
! all entries in this dateb s 

literal NFBS$C_XD9_DST = 251789377; ! Destination DTE address 

Literal NFBSC_XD9_ = 251789378; ' Call mask 

Literal NFBSC_XD9_CVL = 251789379; ' Call value 

Literal NFBSC_XD9_GRP = 251789580; ! Group name 

Literal NFBSC_XD9_ = 251789381; ! DTE number 

Literal NFBSC_XD9_ = 251789 He ! €8 Object name 

Literal NFBSC_XD9_FIL = 251789383; ! Command procedure to execute when starting object 
Literal NFBSC_XD9_USR = 251789384; ! User name 

Literal NFBSC_XD9_PSW = 2517 oee2: ! Password 

Literal NFBSC_XD9_ACC = 251789386; ! Account 

X.25 tracing facility (global) parameters. 

Define a field identifier index for each parameter in the XTI database. 

} 

Boolean Parameters 

literal NFBSC_XTI_LCK = 268435457; ! Set if conditionally writable fields are not writable 
; “Longword’’ Parameters 

Literal NFBSC_XTI_STA = 26 5 1 08; ! State 

Literal NFBSC_XTI_BFZ = 268501009; ' Buffer size 

Literal NFBSC_XTI_CPL = 268501010; ' Capture Limit 

Literal NFBSC_XTI_MBK = 1011; ! Maximum blocks/file 

Literal NFBSC_XTI_MBF = 1012; ! Maximum number of buffers 
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iteral NFBSC_XTI_MVR = 268501013; f 
String Parameters 
iteral NFBSC_XTI =£0L 


' all entries int 
iteral NFBSC_XTI “Ms 2 


= 268566592; : 


eit 6593; : 


X.25 tracpoint (local) parameters. 


1FoSeoct9ge 35:02:08 


VAX=11 Bliss-32 V4.0-7 
"$255$DUA28: 


Maximum trace file version number 


Collating field. This field must be unique across 
Trace file name 


Define a field identifier index for each parameter in the XTT database. 


Boolean Parameters 
iteral NFBSC_XTT_LCK = 285212673; : 
“‘Longword’’ Parameters 


iteral NFBSC_XTT_TST = $367 reese: : 
iteral NFBSC_XTT_CPS = 28527 3 


String Parameters 
iteral NFBSC_XTT ~C0L = 285343808; : 


' all entries in this databe $8 
iteral NFBSC_XTT_ te = 285343809; ! 


Set if conditionally writable fields are not writable 


State 
Capture size 


Collating field. This field must be unique across 
Tracepoint name 


K.25 Access (qualified by a given network) 


Boolean Parameters 

iteral NFBSC_XAI_LCK = 452984833; : 
“Longword’’ Parameters 

iteral NFBSC_XAI_NDA = 453050384; : 
String Parameters 
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Boolean Parameters 


eral NFBSC_SPI_LCK = 
eral NFBSC_SPI-PRL = 


301989890: 


er 


l 
1 
! 
' 
i 
! 
l 
1 
! 
{ 
! 
! 
1 
1 
' 
i 
! 
! 
' 
i 
l 
' 
' 
' 
i 
1 
l 
' 
1 
1 
Define a field identifier index for each parameter in the XAl database. 
' 
' 
' 
i 
1 
! 
‘ 
i 
! 
£ 
' 
i 
l 
t 
t 
l 
t 
1 
' 
1 
' 
' 
' 
i 
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Set if conditionally writable fields are not writable 
Node address 


Collating field 
Network 


User id 
Password 
Account 
Node id 


Set if conditiona 


Ly writable fields are not writable 
Proxy flag which init 


ially started server process 
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Boolean Parameters 


iteral NFBSC_AJI_LCK = 318767103: 
iteral NFBSC_AJI_REA = 318767106; 
Longword Parameters 
Literal NFBSC_AJI_ADD = 31 656; 
iteral NFBSC_AJI_TYP = 31 657; 
iteral NFBSC_AJI_LIT = 31 638: 
iteral NFBSC_AJI_BLO = 31 659; 
iteral NFBSC_AJI_RPR = 318832660; 
String Parameters 
literal NFBSC_AJI_COL = 31 398 40; 
iteral NFBSC_AJI_NNA = 31 33 41; 
iteral NFBSC_AJI_CIR = 318898242; 
Define SDI (Service DLE) p 


Boolean Parameters 
iteral NFBSC_SDI_LCK = 436207617; 
Longword Parameters 


iteral NEBSC_SDI_SuB = 436273168; 
iteral NFBSC~SDI~PID = 436273169; 


String Parameters 


iteral NFBSC_SDI_COL = 4 7 ¢3 
iteral NFBSC_SDI_CIR = 4 753; 
iteral NFBSC-SDI~PHA = 436338754; 
iteral NFBSC_SDI_PRC = 4365358755 


arameters 
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Server PID 

IRP of weiting BECLSERY Q10 (0 if process active) 
Channel associated with DECLSERV IRP 

Remote node address which initially started server 


Collating field 

ACS used to init 
Remote user ID w 
Last (current) S 
Last (current) N 
Last (current) p 


bly start server process 
ch initially started server 
I given to server process 
B given to server process 
oce 


a 
h 
C 
rocess name given to server 


Set if conditionally writable fields are not writable 
Reachable (set if two-way communication estabi ished) 


Node address 

Node type 

Listen timer for this adjacency 
Partner's block size 

Partner's router priority (on NI) 


Collating field 
Node name 
Circuit name 


Set if conditionally writable fields are not writable 


ce substate 
f process owning this DLE Link 


o- 


Collating field 

Circuit name 

Service physical address (BC only) 
Name of process owning this DLE Link 
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Define identifiers for each parameter in all database 


ooo o 
ro 4 oo 
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** The low order 16 bits for each parameter must be unique ** 
eee with respect to all other parameters in its particular *** 
** database. ae 


' 
' 
! 
' 
' 
Define a field identifier index for each parameter in the NDI database. 
' 
Boolean parameters 


1963 ‘ 

13ee Define the AREA database (read only) for level 2 Phase IV routers only. 
1966 i 

139 Boolean parameters 

1368 iiteral NFBSC ARI_LCK = 33220035): ' Set if condtetonat ly er pritatte fields are not writable 
130 Lit teral NFBSC_ARI_REA = 44322; ! Set if node is reachab 

197¢ “Longword’’ Parameters 

Hb 4 literal NFBSC -ARI_ADD = 260 8 2: ! Address 

1975 Literal wrest “ARI-DCO = 9875; ! Destination Cost 

1278 Literal NFBSC_ARI_DHO = 208 9874; ' Destination Hops 

130 Literal NFBSC_ARI_NND = 360 9875; ' Next node address 

1378 String parameters 

1981 Literal NFBSC_ARI_COL = 3356754 $38: ! Collating field 

1988 Literal NFBSC_ARI-DLI = 356754 57; ' Circuit used for normal traffic to area 
1387 Literal NFBSS 4 EF4 = 

1 macro NFBSW_STR_COUNT = 16,0 2; ! $tring count field 

: 85 macro NFBSB_STR_TEXT = 2, 6° 6,0°%: ! Start of string data 
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tee MODULE DR *** 
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i 
DISCONNECT REASONS 
Literal NEYSC_DR_NORMAL = 0; ' NO ERROR (SYNCH DISCONNECT) 
Leora METSE-PRCRONODE = 2: ieartcesgioes code Greg tam 
Literal NETSC"DR-SHUT = 3; i NODE OR LINE SHUT TING DOWN 
Literal NETSC-DR-NOBJ = 4; i UNKNOWN OBJ JECT TYPE OR PROCESS 
HASeat AENRESBRcptyd | Biers eat ee 
10 Literal NETSC-DR-PROTCL = 7; i GENERAL PROTOCOL ERROR 
011 Literal NET$SC-DR-THIRD = 8: i THIRD PARTY DISCONNECT 
Org Literal NET$C-DR-ABORT = 9; i DISCONNECT ABORT 
1 Literal NETSC_DR_IVNODE = 2; ! Invalid node name format 
14 Literal NET$C-DR-NONZ = 21; i NON-ZERO DST ADDRESS 
15 Literal NET$C-DR~BADLNK = 22; i INCONSISTENT DSTLNK 
if Literal NETSC“DR_ZERO = 23; i ZERO SOURCE ADDRESS 
1 Literal NETSC~DR-BADFC = ai. i FCVAL ILLEGAL 
18 Literal NET$C~DR-NOCON = ¢j i NO CONNECT SLOTS AVAILABLE 
01 Literal NETSC~DR-ACCESS = 34; i INVALID ACCESS CONTRO 
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-BADSRV =_35; 
ss 33. 
if $9; 
=NOLINK = 41; 
CONF = 42; 

“IMLONG = 43; 
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! SESSA KAA EAAAAAAAEAEAETAAEEE TAREE AAAAERAE AAA AA AERA AEAAAAAAAAAAAAEAAAAAAAAAAARAAARAEAAEAAAAERAERAEAAAERAAEAATAAEAEE 


! Created 15-SEP-1984 23:06:45 by VAX-11 SDL V2.0 Source: 15-SEP-1984 22:47:57 _$255$DUA28:CNETACP.SRCIDLED 


! RERARAAAAAAARAAAAAARAAAE RARE AAR AE AAA AEEEE AAA TA AAA EAE A AAA AA AAA AAAARAAAEAAEAARARAREAAAAREREAAHEEReAee TET eEee 


DSRaSAR OOS 


macro dwb$L_fTink = b 
macro dwb$L_blink = 4 
macro dwb$w_size = 8 6 
macro dwb$b_type = 16,6 
macro dwb$b_access = {1 
macro dwb$w_refcnt = 12 
macro dwb$w_ f ags 4 
Literal dwbSs_flag é 
macro dwb$v_run 0 
macro dwb$v_dil_ { 
macro dwb$v_dil_ 
macro dwb$v_bc = 
tet 


macro dwb$v_de 
f 
Literal dwb$s_fiT 


macro dwb$v_ fil 


DWONAULS WN" OOBNOULSWN oO 


OOoooocccoo 
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macro dwb$q uber feves 2 g0-0-0 x; 


macro dwb$q_user_xmt = 36,0,0,0 %; 
Literal dwbSs_user_xmt = 6; 

macro dwb$q_xmt_pnd = 44,0,0,0 2%; 
Literal dub$s nat ond 
macro dwb$l_pid = ¢ 0 : 
macro dwb$l-ucbO = 56,6,32,1 &; 
macro dwb$w_chan = 60,0,16,1 2; 
macro dwb$w_path = 6 6,1 
macro dwb$G_remnod = 64,0,0, 
Literal dwb$s_remnod = 
macro dwb$b_substa = 10. ‘ 
macro dwb$b_irpcnt = 7 
macro dwb$L_dil_ucb = v 6 
macro dwb$w_dll_chan = 
macro dwb$w-id = 78,0,16,1 
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1 ; 


15-Sep-1984 23:07: VAX-11 Bliss-32 V4.0-74 Pa 
13-908713 4 33:05:98 SOSSSDUADB CNETACP SRCTLIBTAIL.B32:1 _ (1) 


Or? ! 
re : Version: *v04-000' 
086 i¢¢ 
S 1 : NMATAIL.B32 
Oa$ i Source to ytectore the macros required for the precompile of 
S : NMALIBRY.B52 so they do not appear in the Library. 
a 
Hy UNDECLARE ZQUOTE SEQULST, 
QUOTE GETIST_, 
44 ZQUOTE GET2ND_, 
1 ZQUOTE NUL2ND_ 
O36 3 
09 
094 ' 
095 ' End of NMATAIL.B32 
096 ‘ 


COMMAND QUALIFIERS 
BLISS/LIB=LIB$:NET/LIS=LISS$:NET SRC$:LIBHEAD+L1B$:NETCTL+NE TNPAGED+NETUSR*DLEDEF +SRC$:LIBTAIL 
Te Time: 00:19.8 


Lapsed Time: 00:31.0 
Lines/CPU Min: 6348 


; Lexemes/CPU-Min: 36490 


Memory Used: 227 pa 


pages 
; Library Precompilation Complete 
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